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F. Lebastard p54 Compte rendus 
PPC PC p56 commande groupée 
Philippe Romascano p58 Chapitre de Lausanne 


APPLICATIONS HP-410C 
R. Nelson/Bornes p60 Electricité statique (à suivre) 
REUNION A TOULOUSE 
Une réunion est prévue à Toulouse mi Novembre au centre culturel de St 
Cyprien date et heure ci-contre si je les ai eus à temps, sinon contactez 
moi. 5 novembre de 14 h à 18 h. 


REUNION A PARIS 


Une réunion est prévue à Paris pour les adhérents de PPC-T (ne pas confon- 
dre avec le chapitre de Paris} Contacter Pierre David (cf organisation) 
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recus depuis le dernier numéro: Datafile Juin/Juillet/Aout V2N3, 
sorti au format (A4) habituel mais agraphé au lieu de relié. Le club 
semble avoir quelques problèmes d'organisation, mais le journal est 
toujours aussi beau. PPC UK C/O David M. Burch Astage Rectory lane 
GB Windlesham, GU20 6BW, England. 
JPC, journal du chapitre de Paris Aout (VIN5) 42 pages A4 sans réduc- 
tion. L'impression s'améliore doucement, mais il semble qu'il y ai 
des problèmes pour les articles, on ne relève pas moins de 24 articles 
de Robert Schwartz dans,ce numéro! Philippe Guez 56 rue J.J. Rousseau 
75001 Paris. 
PRISMA, journal du groupe allemand. Toujours aussi beau (mais je 
ne lis toujours pas l'allemand!). CCD Limburger Str. 15, 6242 Kron- 
berg II, RFA. 

Toujours pas de PPCTN Australlien, mais des bruits arrivent à leur 
sujet, ils ont réussi à éliminer les roms internes d'une 41C et a 
les remplacer par des eproms à leur façon. On s'amuse comme on peu. 


petites annonces 





T100 Gérard Santraille vends HP41(10/79) 1000F, QRAM(6/81) 500, Xx-F 
(9/82) 500, Time (5/83) 500, lecteur de cartes + batterie + chargeur 
+ 80 cartes (10/82) 1500F. 

T256 Christophe Travers vends un lecteur de cassettes (3000F), + 
module HP-IL 300F. 

Pierre Yves Asselin(T?) vends système HPA1+IL complet, + HP-97 le 
contacter 16/20 ave Ducis 92500 Rueil 16 (1) 708 46 03. 

T86 Marcel Trimborn vends un HP-IL converter HP82166A acheté 29O0F, 
vendu 1900. note de l'éditeur: à ce prix je ne sais pas exactement 
ce que c'est, cette référence du convertisseur étant usuellement 
vendue 1300F! peut-être s'agit-il de la version "'carossée''HP-IL/GPI0? 

Ti Jean-Daniel Dodin vends programmeur d'Eprom SOFTY acheté 2250, 
vendu avec lampe à effacer les eproms 1500F. Je n'ai plus le temps 
d'assurer la duplication des eproms, qui doit être faite maintenant 
par Didier Jehl (T80). 

T1 vends également ‘“pico informatique et gestion d'entreprise" de 
Baumgartner et Petitgand, 60F franco. 


A l'aide! 


T19 Roland Schuttler recherche pour un ami des programmes de Génie 
Civil. Qui peut lui donner des adresses? 

La société SQUIRELLE 12 rue de la tour 31650 Saint Orens tel 16 (61) 
54 00 O1 cherche à distribuer des logiciels de jeux éducatifs actuel- 
lement pour ORIC, LYNX, DRAGON, T0O7, en avez-vous? 

T71 J. Boschat Vouvdrait que le club diffuse dans sa bibliothèque 
des livres américains sur l'HP-IL (The HP-IL System..., HP-IL Interface 
specifications.. y a-t-il une clientèle pour cela?? sinon vous devez 
commander directement à Educalc mail store 27953 Cabot Road Laguna 
Niguel CA92677 USA. 
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TTL 





La bibliothèque de programmes officielle de HP à Genève est définiti- 
vement fermée. J'essaye de récupérer les programmes qui y étaient 
entreposés, sans trop savoir ce qu'il sera possible d'en faire. HP 
à l'air de vouloir nous laisser ce créneau, estimant (et disant) 
que nous faisons le travail mieux qu'eux. Merci. 


Etienne Poupée a fourni un certain nombre de MLDL au prix souscription. 
Bravo. Mais il ne m'a toujours pas téléphoné. En attendant le club 
continue ses préparatifs pour la mise sur le marché d'un MLDL PPC-T 
corrigé de son défaut de consommation. Affaire à suivre. 

HP change d'adresse nouveau siège: Hewlett-Packard France, parc d'acti- 
vité du bois briard, Avenue du Lac, 91040 Evry CEDEX tel 16 (6) 077 
83 83. 


La FNAC a publié dans le cadre de ses dossiers un dossier micro infor- 
matique sur les ordinateurs familiaux. Disponible gratuitement dans 
les magasins FNAC. 





éditorial 

Chers amis 

Ce numéro de PPC-T va sans doute marquer une date importante dans 
l'histoire de PPC-T. 

En effet , non seulement nous terminons ainsi la deuxième année de 
parution, mais nous changeons de format, de mode d'impression et 
d'imprimeur! 

Ceci dit, le numéro actuel est un numéro d'essai et nous ne 
pouvons vous garantir que les prochains numéros seront identiques. 

En fait pour obtenir des prix intéressants nous avons été obligés 
de tirer à 1000 exemplaires. Or nous n'avons encore qu'environ 400 
adhérents, et encore beaucoup d'entre eux doivent renouveler leur 
cotisation dans les prochains mois et rien ne dit qu'ils le feront. Nous 
avons pris un paris sur l'avenir, le paris que la croissance du club va 
continuer au rythme qu'elle a pris cette année, paris que nos adhérents 
seront fidèles non seulement au club, mais à HP. 

Il me semble que ces paris peuvent être tenus. Je n'en veux pour 
preuve que l'accumulation de propositions d'articles dans mon bureau, 
accumulation qui me pose des problèmes de choix, mais qui montre bien 
l'intéret que les adhérents portent à leur club. 

Quand, il y a 8 mois, nous avons prévu de fixer en Juin une 
cotisation à 100F nous avions l'intention de maintenir ce prix long- 
temps. En fait l'évolution semble nous donner tort. Bien sûr l'augmen- 
tation de cotisation a toujours correspondu chez nous à une augmentation 
de la surface de papier fournie, mais ce n'est cependant pas sans 
préoccupation que nous suivons cette évolution. Notre principal objectif 
est la permanence de notre fonctionnement. Il n'est pas question pour 
nous de nous engager dans un processus que nous ne pourrions pas 
maitriser. Lentement mais sûrement! C'est pour cela que nous ne 
proposons pas de parution mensuelle, ce rythme étant trés difficile à 
tenir. En fait, au niveau des clubs, a peu prés personne ne le tient. 
Même PPC USA se contente de sortir un nombre de pages donné par an, la 
périodicité étant assez fantaisiste. Quand à nous, nous envisagerons de 
passer mensuel quand nous aurons les moyens de faire entièrement 
composer le journal par l'imprimeur, et de le faire expédier par un 
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"routeur". Il n'est pas dit que cela soit pour dans longtemps, mais rien 
n'est sûr. Vous avez sans doute remarqué que si les journaux sortent à 
peu prés régulièrement, les circulaires sont plus irrégulières. 

En pratique, l'orientation serait plutôt vers un journal bimes- 
triel de volume double. Il n'y a pas de position intermédiaire, car le 
journal que vous avez entre les mains est fait d'une seule feuille de 
papier pliée, il faut donc ensuite passer à deux feuilles. De plus les 
tarifs PTT font que nous sommes actuellement à la limite des 100g (3,10 
F) et que tout dépassement nous amène à 6,30 F. 

Mais ce doublement de la pagination entraine ipso facto le 
doublement de la cotisation. Nous avons donc le plus grand besoin de 


votre avis à ce sujet. Est-ce qu'une cotisation à 200F vous parait 
insuportable, suportable, trop faible (je rève!). Répondez vite. 


Jean-Daniel Dodin (T1) 


Le club diffuse maintenant des classeurs de cartes magnétiques d'un 
type nouveau et (presque) original. 


A la base des pochettes de plastique porte documents pour classeurs 
comme on en rencontre partout (transparentes). Ensuite une modification 
qui ajoute à ces pochettes, du coté opposé aux perforations (et donnant 
donc une largeur légèrement plus grande aux pochettes), 4 emplacements 
pour cartes magnétiques (41/65/67). Chaque emplacement peut contenir 
deux cartes. 

Chaque pochette est donc prévue pour contenir la documentation d'un 
ou de deux programmes, le mode d'emploi et les cartes du programme, 
parfaitement protégées. Cette disposition permet d'avoir tout le 
nécessaire à portée de la main. Les pochettes sont vendues par 10 
pour 50 F (voir bons de commande). 

Compte tenu de la plus grande largeur des pochettes, elles nécessitent 
des classeurs spéciaux. Ceux-ci sont également vendus par le club 
au prix unitaire de 50F. Les couleurs disponibles sont rouge sombre 
et noir (si d'autres couleurs vous paraissent souhaitables: jaune, 
vert, bleu, il sera ultérieurement possible de le faire). 

Cette fabrication, la première entièrement produite par le club nous 
parait une facon idéale de conserver les programmes d'usage courant; 


Une EPROM BOX en Hollande: peut contenir jusqu'a 6 fois 4K par 6 
jeux de 2716 et 2732, il est possible de les adresser aux adresses 
hautes des ports, ce qui gagne de la place, on peut y ajouter un 
MLDL de 8K. EPROM BOX $245, MLDL $395. Circuits imprimés disponibles 
pour bricoleurs. Contacter TH Boekhandel Prins Department ERAMCO 
Binnenwatersloot 30, NL-2611 BK Delft Pays Bas, téléphone 015 136989 
(demander Wim Van Yperen; parle anglais, français je ne sais pas). 


J'ai vu à La Règle à Calcul un livret de programme de calcul d'éclai- 
rage intérieur diffusé semble-t-il gratuitement par Philips avec 
explications et codes barre; 
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SP ENS 
C'nqui nant garhge 


JVE-250 4 
a LE, face Limatlre 
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JACQUES VAUCELLE ou Homd— 
La Chasserie He Rp - _ A # 13 
F. 35300 FOUGÈRES ! 

_MLEFROM 1H jenû / ‘ 


FRANCE 


téléphone : (16-99) 98.83.69 
 . tél.export:(0033-99) 98.83.69 rw _ nv 1 en C2 


RXR HP 82906 a “HêrB+ PEL + CENTRON CS, 


X+X 

Vao cœur 
NSTO +. ’ 
NRCL f” 


CODE 
DECODE 
FURFEN 
FAT 
NAME 


me M, MONSENEGO Eric (T 341) 


XCAT 105, rue de la Convention 
75015 PARIS. 554 11 86° 


. 
‘. 


aVIEW 

TFX 

ROM-REG 

REG-ROM Cher JDD, 

at Juste ce petit mot pour t'informer que je viens 
NEWDIR d'acheter à M.POUPEE la toute nouvelle EPROM qu'il me van- 
FLLENG tait depuis longtemps ... Elle est très complète, et sera 
INTT associée à un livre sur le microcode et le MLDL, Cette 
COFYROM petite merveille qui équipe les nouveaux MLDL n'est pas 
MNEMO tenue du COPYRIGHT, bien au contraire... Elle est livrée 
DCDROM avec un mode d'emploi tapé à la machine (qui est malheureu- 
HEXPE sement sans exemples) ;: et éventuellement des listings : 
D-H mi crocode des fonctions. Elles sont au nombre de 48. Parait- 
H-D il que dans 1° EPROM, ZX ne reste que 2 octets.Le catalogue 
ENTRY? de ce "bi jou" contient évidemment de nombreuses fonctions 
FOKE classiques de gestion du MLDL mais aussi quelques unes 
XYZPOKE communes à la TOULROM ; mais il y a aussi de très bonnes 
SUES : fonctions pour ceux qui n'ont pas la chance ni les moyens 
COMPARE d'avoir un MLDL : 1 KA fonctionnant soit avec les codes 

LE XROM soit octet par octet ; 1 LB ; 1 programme de manipu- 
NNN lation de tous les drapeaux ; conversions DEC-HEX et inver- 
MCD sement. Elle est en copie libre (je ne suis pas payé pour 
XYZASN la pub !) Robert SCHWARTZ en dispose d'une copie ; j'espère 
NOT qu'il ne sera pas le seul car cette EPROM est assez compé- 
USER titive avec les autres, De par sa puissance elle peut rac- 
COMPILE courcir et accélerer bon nombre de programmes... 

NEWCAT 

RINECD 

ÉEY 

MLIADR 

RSUM 
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Autour de la boucle par Janick Taillandier Tome 1 (La boucle HP-IL, 
procédure, contrôleurs, imprimantes). 


La boucle HP-IL est un nouveau concept d'interface élaboré par 
Hewlett-Packard pour permettre la communication entre des appareils de 
poche et un grand nombre d'accessoires, y compris des ordinateurs de 
table. 

Pour la première fois, cette série de livres donne une vue 
d'ensemble de la boucle, ce qui n'est que justice, puisqu'elle a 
justement pour but la réunion de plusieurs appareils. 

Le premier tome pose les bases en décrivant de façon complète le 
protocole puis en traitant des contrôleurs, HP 41C et HP 75C, et des 
imprimantes standard HP (24 et 80 colonnes, vidéo). 

Une référence, aussi bien pour celui qui envisage l'achat que 
pour l'utilisateur régulier. 


165 pages, format 16 x 24 
Extraits de la table des matières: 


Introduction 

Première partie: La boucle 

Introduction aux systèmes de communication / Le protocole HP-IL. 
Deuxième partie: Les Contrôleurs 

Introduction / La HP41 / Le HP75C: Présentation de la machine, 
Instructions HP-IL standard / Ordres supplémentaires. 

Troisiéme partie: les imprimantes 

Les périphériques HP-IL / L'imprimante HP82162A / l'imprimante 
HP82905B / L'interface vidéo HP82163B:Présentation physique, 
utilisation, utilisation depuis la HP41, l'interface vidéo 
MCO0701A / Conclusion provisoire 

Référence: / Les clubs / Tables 


Tome 2 : en préparation 


109 programas para ordenadores personales y calculadoras par R. Farrando 


Ce livre est destiné en priorité aux lycéens de 16-18 ans. Sa 
caractéristique principale est que les programmes sont donnés pour 
plusieurs machines:Ti 57, HP 41C, PC 1211, FX 702P, ZX 81, HP 85, Epson 
HX 20 permettants ainsi une comparaison des différentes machines. La 
langue est simple et accessible même avec un faible niveau d'Espagnol. 


122 pages format 17 x 24 
Extraits de la table des matières: 


Prologo 4 introduccion 

Parte 1. Familias de numeros 

Los numeros de Fibonacci / Los cuadrados automorficos / numeros 
al azar / Los cuadrados palindromicos / Ternas pitagoricas / Las 
cifras residuales / los numeros primos. 
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Parte 2.° Métodos para el tratamiento de los numeros 

Maximo comun divisor por el algoritmo de Euclides / comprobation 
de los errores en el calculo de un numero / numero de cifras del 
factorial de un numero / como presentar los ceros o la izquierda 
de un resultado. 

Parte 3. La precision ampliada 

Todas las cifras de una fraccion periodica / obtencion de las 
cifras decimales de la raiz cuadrada / ampliacion de la 
precision en la raiz cuadrada / calculo del factorial de un 
numero / obtencion por series del numero e / como ampliar la 
precision en el calculo del numero e / Calculo del numero PI por 
poligonos inscritos / una serie para obtener el numero PI / como 
ampliar la precision en el calculo del numero PI. 

Apendice. Programäs para otros ordenadores personales / biblio- 
grafia. 


En anglais 
An easy course in programming the HP41C par Ted Wadman et Chris Coffin 


Ce livre est un manuel d'autoapprentissage de la HP41C, facile à 
lire, qui avance doucement et amicalement de sujet en sujet. 

Le texte est calligraphié en grands caractères pour la facilité 
de lecture, et comporte de nombreux dessins et 
bandes dessinées. 

Destiné aux débutants ou à ceux qui veulent réviser leurs 
connaissances. 


256 pages au format 21 x 25 
Extraits de la table des matières: 


Whodunit/Setting the scene 

How to picture your HP-41: 

Data register/ALPHA register/Display/Stack registers/Quiz 

Keying data into the HP-41 

Functions and the keyboard 

Shift/XEQ/Back arrow/Catalog 3/Alpha characters on the key- 
board/Function Names vs function arguments/Function on the ALPHA 
keyboard 

You've got to know your stack 

Stack lift/ENTER/CLx/Arithmetic in the stack/The L regis- 
ter/Exercise 

The naked programm 

The programm pointer/Size/.END./GTO./GTO../END vs .END..QUIZ 
Labels and branching 

Global vs local Labels/Why use a global Label/Why use a local 
Label/GTO vs XEQ 

Decisionmaking in a programm 

Conditional testing/Flags and How to use them/Looping with ISG 
and DSE 

Alphanumerics un programm 

ALPHA strings / PROMPT / ARCL / AVIEW / APPEND / CLA / ASTO and 
ASHF / AON and AOFF / AVIEW and flag 21 

Indirect adressing 

With register / With Labels 

Programm developpment 

Review / Balancing a check book / Decimal fraction to/from 
inches and sixteenths / Plotting points from an equation 
Appendix 
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On using the manual / Statistical functions / Fun facts to know 
and tell 
For further reading / Write to us / Editorial 


J9 Do IN 


Afin de vous aider à choisir ce dont vous avez besoin, 
il m'est apparu nécessaire de dresser une petite liste des photo- 
copies disponibles au club avec le détail de leurs contenus 
respectifs. 


P2: East Coast Conference (91 pages) en anglais 
-Le module TIME 
-La compilation synthétique, les GTO sans LBL 
-Comment éviter la décompilation 
-Applications du Convertisseur HP-IL 
-Echanges entre X-Memoire et cassette 
-Régression linéaire et non linéaire sur HP-41 
-Le multimètre digital HP-IL 
-Interface vocale pour la 410C 


P7: Microcode PPC (207 pages reliées) 

Listings du microcode interne de la 41 (Roms O0, 1, 2), 
du lecteur de cartes, du module X-Fonctions, du Time, du lecteur 
de codes-barres,de l'unité de cassettes, des 2 imprimantes (IL et 
non IL), du module IL, de Toulrom, du module de service HP (SM1C) 
et de l'Eprom Monitor. 

Codes héxadécimaux et mnémoniques PPC. 


P8: Microcode HP (365 pages reliées) 

Listings annotés et commentés (en anglais) du microcode 
interne de la 41 (Roms O0, 1, 2) et liste des points d'entrée du 
microcode. 

Codes en octal et mnémoniques HP. 


P9: Monitor (18 pages) en anglais 
-Explications des fonctions de l'Eprom Monitor 
-Programme d'application 


P10: Trésors cachés de la 41C (24 pages) 

Collection complète des articles de l'Ordinateur Indivi- 
duel sur la découverte de la programmation synthétique (en 
français). 


P11: Manuel technique HP 41 (98 pages)en anglais 

Manuel fourni par HP à l'usage de ses services 
après-vente. Décrit les opérations de démontage-remontage, 
utilisation du module de service (SM1C), fonctionnement du 
microprocesseur et description de ses fonctions (mnémoniques HP). 


P12: Manuel Convertisseur (36 pages) en anglais 
Manuel d'utilisation du convertisseur HP-IL. 
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P13: Southwest Conference (48 pages) en anglais 
-Commentaires sur le HP 75C 
-Détail des fonctions du Math-Rom du HP 75C 
-Interfaçage HP-IL 
-Graphiques sur les 2 imprimantes 
-Bibliographie du microcode 
-Interface HP-IL/HP-IB 
-Fonctions du microprocesseur HP 41 (mnémoniques PPC) 
Extended I/0 Rom 


P14: HP Journal janvier 83 (29 pages) en anglais 
Présentation très détaillée du "concept" HP-IL et 
fonctionnement de la boucle 


P15: Dossier Hardware (70 pages) 

Toutes les manipulations materielles sur la 41C depuis 
l'ouverture du boitier en septembre 1979 par les gens de PPC USA, 
jusqu'à l'interface vocale et le MLDL (fin 82). Articles en 
anglais,français et allemand. 


P16: Album 82 (69 pages) 
Recueil des premiers numéros de PPC-T parus en 1982 (6 


numéros VIN1 à VINA4 et PPC-T n° 1 et 2). 


Toutes ces photocopies sont tirées au format A4  ({ 
21#29,7 ). 

Pour les commandes, libellez vos chèques ou mandats à 
l'ordre de PPC-T et n'écrivez jamais au dos du chèque ce que vous 


commandez mais toujours sur une feuille séparée. 


Les commandes sont à envoyer à: 
Gilles BARRET 
92 Ave de Muret 
31300 TOULOUSE 


Nota: Je fais generalement un envoi par semaine, sauf rupture de 
stock. Ceci pour vous donner une idée du délai nécessaire à la 
réception de vos photocopies. 


Happy Programming 
Gilles BARRET (9528 T22) 


oo 


M.J Boschst, Grande-Synthe le 24/05 
4,rue Descartes, 

59760 GRANDE-SYNTHE. 

T7I 


MPROGRAMMER HP-4T" 
Cet ouvrage est dû à Philippe 
DESCAMPS et Jean-Jacques DHENIN,le premier s'étant 
déjà fait connaître par les Trésors Cachés de la 
HP-4IC,et un compilateur basic pour HP-4I(Cf 1'OI). 
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Toutefois,contrairement à ce que 
l'on pourrait penser,il n'est pas question de FPS 
dans ce livre,qui traite de la programmation 
standart sur HP-4I sans périphérique.D'autres volu- 
mes sont prévus,qui nous réservent sans doute 
d'agréables surpriges... 


Plan de l'ouvrage: 


Une brève introduction présente 
le pourquoi et le comment du livre,avec une pointe 
d'humour qui restera présente dans toute l'œuvre... 
Un de ses objectifs étant de démontrer la puissance 
du langage HP-4T par rapport au basic,je trouve 
étonnant que l'auteur nous donne le "mode d'emploi" 
du manuel sous forme d'un algorithme...en Basic!!! 


CHAP_T:Le Langage Symbolique. 

On trouve de nombreuses précisias 
sur le langage de notre machine,sa position par 
rapport aux autres langages,avec des termes précis 
et'"techniques" savamment employés. 


CHAP 2:Tests et Drapeaux. 
Description précise de tous les 
drapeaux et de leur utilité,de nombreux "trucs" 
utiles(conditions sur deux drapeaux,fonctions ET 
et OU...)qui font cruellement défaut à le notice HP 
et présentés par des exemples courts. 


CHAP_3:Face à la Pile: 

Un rapide historique de la fameu 
se "pile" de HP,ses multiples avantages.Présentation 
des différents registres(XYZTL)et des effets des 
fonctions sur la pile.Une originalité assez géniale: 
le LOGIGRAPHE qui permet de trouver la meilleure 
méthode pour passer d'une configuration de la pile 
à une autre...(un bon exercice pour les"novices" de 
la RPN). 





CHAP 4:Hasard Nécessaire. 

Ce court chapitre fait le point 
sur les générateurs de nombres aléatoires,sans 
apporter grand chose de nouveau au lecteur... 


CHAP 5:Sur tous les Tableaux: 

C'est,je crois,le chapitre le 
plus intéressant de l'ouvrage:tout ce qu'il faut 
savoir pour la manipulation de tableaux sur HP-41I, 
L'auteur nous donne les différents pdliatifs de 
programmation qui permetterfde faire la même chose 
que les "Basics'";avec des applications sur la 
manipulation des matrices. 
Ce chapitre comble efficacement les lacunes du 
"manuel de l'utilisateur'"sur ce sujet, 


CHAP_ 6:l'alpha est l'Oméga: 
è Une description précise des 
possibilités alphanumériques de notre HP-4I,ses 
limites;ainsi qu'une présentation des diverses 
fonctions alpha.qui complète encore une fois 
agréablement le manuel d'utilisation. 
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ANNEXE: 

Solution des exercices de cha- 
que chapitre. 

Obtention des fonctions(!) 

Deecription des fonctions(Nb 
d'octets,effets sur la pile,temps d'éxécution, 
message d'erreur...) 

Tableau de tous les drapeaux. 

Toutes les routines du livre 
en CB. 


EN_CONCLUSION: 


Cet ouvrage constitue surtout un prolon- 
-gement avantageux de la notice HP;la plupart des 
lacunes de cette dernière sont complétées ,le tout 
agrémenté de nombreux exemples. 

Comme le faisait remarquer JD DODIN,on 
ne nous apprend pas réellement comment arriver soi- 
même à un tel résultat,et les routines ne sont pas 
toujours utilisables sans modification dans vos 
propres programmes .En fait,je crois que le titre 
trop ambitieux nuit à l'oeuvre, qui m'a tout d'abord 
déçu,bien qu'elle contienne de nombreuses idées... 

Les débutants y trouveront de quoi 
perfectionner leur programmation,les amateurs de PS 
seront sans doute un peu déçus,mais ils pourront 
sans aucun doute y glaner quelques trucs nouveaux! 

Un ouvrage qu'il est utile d'avoir dans 
sa bibliothèque,même si la qualité du papier est 
inversement proportionnelle à son prix... 


Ref:"Programmer HP-4]",éditions du PSI,prix:1O2FF 
En vente dans de nombreuses librairies,possi- 
bilité d'achat par correspondance pour le 
même prix. 


TYI JB 


T275 Fraznçois Lorrain 
50 rue Pierre Merlin 
87300 Bellac 


T283 Michel Gaye 
UVA4 Bloc 57 

1004 El-Menzah 
VI Tunisie 

PAR AVION 


T279 Denis Antonioli 
Av Pratifiori 9 
CH-1950 Sion 

SUISSE 


T276 Lofti Frikha 


INSA ch 408 R3 T280 Claude Kleinhans 


av de Rangeuil 
31077 Toulouse 


T277 Thierry Blanchet 
INSA ch 416 R3 
Av de Rangeuil 
31077 Toulouse 


T278 Cyril Hemery 

Les Erables 

7 av de la Libération 
60200 Compiègne 


5 place de la Crau 
Les angles 
30400 


T281 Jérôme Fraysse 
26 rue St Jean 
30230 Caissargues 


T282 Cyril Reigner 
4 rue de Morlaix 
44800 St Herblain 
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T284 Jean-Philippe Imbach 
1108 rue de Las Sorbes 
34000 Montpellier 


T285 Yves Bonhommeau 
14 rue des Roches 
42800 Rive de Gier 


T286 Seng Bor UNG 
5 rue Duvergier 
75019 Paris 


T287 Marcel Dufour 
rue de Wasmes 77 
B-7301 Quatregnon 
BELGIQUE 

T288 Paul Quilichini 
160 Bd de Cessole 
06100 Nice 


T289 Pascal Heisel 
10 rue Jean Parot 
42100 St Etienne 


T290 Robert Ruzzin 
3bis rue des Buissonnées 
38600 Fontaine 


T291 Nicolas Loiselet 
8bis rue Charles Quint 
59800 Lille 


T292 Claude Goupil 
La Forge 
76290 Mannevillette 


T293 Jean-Michel Martin 
31 bd Pierre Renaudet 
65000 Tarbes 


T294 Denis Privat 
82 b impasse des II Colonnes 
30000 Nimes 


T295 Christian Chartier 
1 square Lamartine 

Apt 141 

77000 Melun 


T296 Claude Shimodaïra 
124 av Mozart 
75016 Paris 


T297 Gilbert Blanchet 
3 rue de la Noë Rido 
22190 Plerin 


T298 Christophe Mertz 
ENST BP856 
29279 Brest Cedex 


T299 Philippe Marino 
25 rue Washington 
76600 Le Havre 


T300 Jean-Claude Vandenhekke 
24 rue J Jaurès 
59560 Comines 


T301 Daniel Jaworskt 
50 Bd de Barlet 
62640 Montigny en Gohelle 


T302 Robert Franzetti 
244 av Rossini 
06370 Mouans 


T303 Vincent Barral 
2 rue Ambroise Thomas 
59460 Jeumont 


T304 Yves Nedelec 
Le Petit St Léger 
Villers en Arthies 
95510 Vetheutil 


T305 Frédéric Broton 
62 av G. Clémenceau 
83310 Cogolin 


T306 Gérard Barrère 

8 allée des Primevères 
St Jouan des guérets 
35430 Chateauneuf d'ille 


T317 Christian Brusset 
129 av des Liserons 
84140 Montfavet 


T318 Laurent Eymard 
22 rue du Cardinal Saltège 
02100 St Quentin 


T319 Pierre Lison 
104 av Monte Carlo 
Boîte 101 

B-1190 Bruxelles 


BELGIQUE 


T320 Antoine Couette 
Kerfgunteyn 

route de Ty Croas 
29220 La Martyre 


et vilaine 


T307 Jean-Claude Boulay 321 Jean-Marc Otero Del Val 


25bis rue de Jemmapes 
78500 Sartrouville 


T308 Martial Guichet 
45bis Fbg Bonnefoy 
31500 Toulouse 


T309 Philippe Queille 
Combe Sabran 
30200 Bagnol/cèze 


Villa Lantin 
Morne Carruel 
97110 Abymes 


PAR AVION 


822 Michel Seigner 


12 rue Abel Ferry 


75016 Paris 


T310 Lucien Gisclong 
1 rue JP Rameau 
91 Chilly Mazarin 


T311 Dominique Talon 
90100 Courcelles 


T312 Daniel Atlan 
40 rue Mal Oudinot 
54000 Nancy 


T313 Françotïs Parisot 
63 route de Gouesmon 
29200 BREST 


T314 Jalal Adamsah 
3 cours des mûres 
95800 Cergy St Christophe 


T315 Jean-Louis Dalmon 
5 cours Monthyon 
15000 Aurillac 


T316 Bruno Desjonquères 
Juntor 

23 rue Michel Couet 
49160 Longué 
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T323 Ronny Colotto 
Waserstr. 18 

CH 8032 ZURICH 
SUISSE 


T324 Jean Rixhon 
av Reine Astrid 187 
B-1410 Waterloo 
BELGIQUE 


T325 Thierry Guitard 
71 rue de Clichy 
75009 Paris 


T326 Nguyen Van Dang 
12 rue du Col Vert 
38320 Poisat 


T327 Jean Bethery 
30 Bd Charles Vaillant Vert 
93410 Vaujours Galant 


T328 André Bouïillaud 
18 av des Pérouses 
63540 Romagnat 


T329 Thierry Bravter 
60 rue du Chateau d'eau 
75010 Parts 


T330 Jean-Pierre Cholet 
138 av Kléber 
Dunkerque 


T331 Alain Pailloux 
23 bd des Minimes Bat D 
31200 Toulouse 


T332 René Vitte 
1 rue À. Chénier 


92130 Issy-les-Moulineaux 


T333 Michel Lechevallier 


BP 237 
75564 Paris Cedex 12 


T334 Eric Sergent 
3 av des avions 
31400 Toulouse 


T335 Virgile Woringer 
Ch de Villard 14 
CH-1007 Lausanne 
SUISSE 


T336 Thomas Valère 
32 sq Clignancourt 
75018 Paris 


T337 Emmanuel Dayan 
27 rue Pierre Curte 
92330 Sceaux 


T338 Jean-Michel Muller 
18 cours des Guillottes 
94700 Maison Alfort 


T339 René Gamper 

129 rue des alliés 
42100 Saint Etienne 
T340 Patrick Cahierre 


Petit Kerbiguet 
56380 GUER 


T341 Eric Monsenego 


105 rue de la Convention 


75015 Paris 

T342 Patrick Jouet 
27 rue Patllon 
42000 Saint Etienne 


T343 Thierry Kokot 


Les Escanoux" tour B n°91 


30200 Bagnols /cèze 


T344 Patrick Courant 
44 rue À Sarraut 
78000 Versailles 


T345 Benoit Menendez 
225 rue de Vaugirard 
75015 Partis 


T346 René Mangenot 
9 rue Pougin 
57158 Montigny les Metz 


T347 Jean-Jacques Duquesne 


52 rue Franck Hemon 
77500 Chelles 


T348 Merkx Alain 
Avenue des Traquets 142 
B-1150 Bruxelles 
BELGIQUE 


T349 Jean-Claude Dubois 
78 rue de Lébisey 
14000 Caen 


T350 Vincent Delorme 
12 rue Gustave Courbet 
75116 Paris 


T351 Alain Dumora 
4 rue de Constantine 
76000 Rouen 


T352 Régis Baquet 
41 rue E Rostand 
76690 Le Havre 


T353 Clinton Hastings 
9 chemin du Maquis 
F-74000 Annecy 


T354 Pierre David 


33 Bd St Martin 
75003 Partis 


T355 Olivier Krajka 
16 Bd de la Liberté 
Salvador Allende 
92320 Chatillon 


T386 Dantel Daou 
3259 Caminito Ameca 
La Jolla CA 92037 
SAN DIEGO 

USA PAR AVION 


T357 Jean-André Wulleman 


145 rue du Repos 
B-1180 Bruxelles 
BELGIQUE 


T358 Jacques Durand 
88 Bd Ney Bat 1E 
75018 Paris 
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T359 Jean-Pierre Magnan 
Villeblanche 

79190 Sauze 

Vaussais 


T360 Michel Locusse 
116 rue de l'abbé Groult 
75015 Paris 


T351 Raymond Pégé 
85120 Breuil Barret 


T362 Alain Pasternak 
8 rue Heurteaux 
57250 Moyeuvre grande 


T363 Jean-Philippe Durand 
Résidence "Les Hirondelles" 
1579 route de Mende 

34100 Montpellier 


T364 Françoiïs-Gilles Carpentier 
08 BP 852 

ABIDJAN 08 

COTE D'IVOIRE 

PAR AVION 


T365 Mark Wilding 
Trevilskey 

NR. Portloe Cornwall 
TR2 SPN 

ROYAUME UNI 


T366 Eric Aubourg 
12 rue des 4 vents 
79000 Niort 


T367 Marc Etienne Vargenau 
4 rue Louvois 
68100 Mulhouse 


T368 Pierre Bisenz 
9 rue du Pavement 
CH-1018 Lausanne 
SUISSE 


T369 Jean Chambosse 
Veysstilieu 
38460 Crémieu 


T370 Olivier Larrieu 
2 rue Cadet de Vaux 
95130 Franconville 


T371 Garnter Jean-François 
6 bd Joseph Vallier 
38000 Grenoble 


T372 Bernard Branquart 
32 Thiarmont 

7190 Ecaussines 
BELGIQUE 


T373 Daniel Blumenroeder 
16 rue de la Patrie 
67300 Schiltigheim 


T374 B. Pons 

28 Woodland Road 
Taren Point 

2229 NSW AUSTRALIE 
PAR AVION 


T383 Frédéric Altermatt 
20 rue Octave Dubois 
95150 Taverny 


T384 Pierre Antoine 
5 rue St Antoine 


T375 Jean-Paul Garnier 91150 Etampes 


132 rue de la Champ Lagarde 


78000 Versailles T385 Claude Guérin 


BP N°20 


T377 Olivier Dodinval 71140 Bourbon Lancy 


Av H. Liebrecht 
84 Bruxelles 1090 


T386 Alexis Kupiec 
BELGIQUE 


2 av du Président Kennedy 
L . Cuincy 

T378 Joël Roffidal 59500 Douai 
87 rue de l'espérance 


08170 Haybes T387 Alain Herreman 


2 rue du Pare Montsourtis 


T379 Jérôme Fontaine 75014 Paris 


63 rue St Marc 


45000 Orléans T388 Didier Renevot 


2 Hameau du Croeziou 


T380 Eric Guillaume 29136 Plogonec 


33 rue Mademoiselle 
T389 Franck Gibier 
14 rue Lecerf 
94210 La Varenne 


75015 Paris 


T381 Nicolas François 
Collège G. Chepler 


T bn : 
54600 Villers les Nancy 20 I AEUES BRAS 


195/34 rue de Ramsgate 


T382 Alain Droneaud RÉ DiSarque 


La Noë St Jean” 
44220 Coùüéron 


T391 François Le Grand 
rue de la poterie 
Trévignon 

29128 Tregunc 


T392 André Oisel 

Bat 5 - Les nouveaux horizons 
Elancourt 

78310 Maurepas 


T393 Laurent Agnel 
Chemin du mas Fléchier 
30000 Nimes 


T394 Benoit Callewaert 
1 rue S. Allende 
62300 Lens 


T395 Moineau Guy 
Potel Avessac 
44460 St Nicolas de Redon 


T396 Pahron Sanguanbhokai 
Lycée Dumont d'Urville 
Av L. Tassigny 

83100 Toulon 


T397 Christophe Benoit 
219 rue de Charenton 
75012 Paris 


a —_—_— 





N°T:334 Nom: 


SERGENT Prenom: ERIC 





AVIONS 


31400 TOULOUSE 


rubrique: Programmes 
machines: HP 10 - 11- 15 


ADRESSE : 3 AVENUE DES 


RECHERCHE D'UN MAXI OU D UN MINI RELATIF 
D UNE FONCTION NUMERIQUE 


La methode consiste à balayer un intervalle de gauche ä droite puis de droite à 
gauche avec un pas moitie du précédent achaque changement de sens. 
Le pas est h , lenbre dechangements est n ”, X°est une valeur proche de 


la valeur cherchée . {maths appliquées & colcolatrices programmables) 
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dceu s ménoires 710 x»? 
introduire: - n° enl GTO À 
- Xo en R1 
en R2 ! 


mettre : -1EEX 50 ou un nbre plus petit a L'affichage. 
‘ : AS x<>2 
uhlisation: Faire[A], résultat a laffichage : MAXIouMINI. 
Pour obtenir le MINIremplacer Fcx) par f(x) 145 CHS 
Erreur probablesur le resultat : ben STO +1 
STO x2 
DSE I 
Exemple:  F(x)= x?-3% +2 GTO 2 
LbL A avec: h=10 20 R} 
x<>1 Xo= -2 R/s 
LbL 2 h2 0,4 LbL B 
RCL 2 MAXI =4 
STO+1 F(x) 
L1 7 
RC e 
GSBB . 
RCL7 US ’ RTN 
BORNES D UNE FONCTION NUMERIQUE 
x<>y — << 


15 


20 


SUR UN INTERVALLE fx, , Xoenb] 


ici Le programme rajoute un pas h ‘ala valeur prècédente et balaye l'intervalle, 
une fois seulement. 


LbL A 

RCLS5 

RCL 3 PLACER :. Xo en R1 
x>u? __ F(Xe) en R5 
KE - h enRr2 
STO3 =N en | 
RCL 5 

RCL 4 Mode demploi 
x<uy? faire [A] 

in S le MAXI sera à l'affichage etdans R4 
STO 4 le MINI dans R3 
RCL?2 

STO +1 exemple:  F(c): X2-3X +2 
RCL 1 avec: Xo = -2 
GSB B h . 01 
STOS5 ñ à 40 
DSE 1 intervalle L-2 ; 2] 
GTO A 

R/s 

LbLB 

[fes | 

RTN 
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HP 75 


HP-75 HP-75 HP-75 HP-75 HP-75 HP-75 HP-75 HP-7 


Numéro 2 - 22 AOUT 1983. 
- FORTH, 
- une présentation du module TEXT-FORMATTER 
(Eric Gengoux), 

- deux programmes BASIC: 
le premier permet d'analyser le contenu 
d'une cassette (Michel Martinet), 
le second fourni une méthode permettant 
d'introduire des calculs en réponse à un 
INPUT (Eric Angelini). 


1 FORTH. 


Le FORTH annoncé la fois précédente est arrivé. Ce- 
lui-ci se présente sous forme d'un fichier LEX (as- 
sembleur) de 12K-octets dans la version de base, cet- 
te taille peut-être augmentée pour accroitre substan- 
tiellement l'espace disponible pour de nouvelles 
variables. 

Le manuel qui accompagne le produit fait 56 pages 
dans lesquelles on présente successivement diverses 
caractéristiques de l'implémentation sur 75 puis les 
utilitaires fournis: 


_- un debugger proche de ce qu'est le mode TRACE 
sur 41, 

- un assembleur qui permet d'inclure dans les 
définitions de mots nouveaux des parties en 
assembleur (gain de temps et/ou problèmes 
d'efficacité), 

- un désassembleur simple mais efficace qui per- 
met de jeter un regard indiscret dans les ROM 
internes ou les fichiers, notamment du type LEX 
comme HPILCMDS, 

- diverses fonctions. 


Ce manuel ne vous explique pas comment utiliser FORTH 
il vous donne simplement les caractéristiques du pro- 
duit (il contient notamment le listing complet de 
l'interprèteur); si vous désirez vous familiariser 
avec le langage, deux livres sont fort recommen- 
dables: 


- Starting FORTH de Leo BRODIE publié chez Pren- 
tice Hall (en anglais). Agréable à lire et 
complet. 

- FORTH de W. SALMAN, O. TISSERAND, B. TOULOUT 
publié chez Eyrolles, en français, un peu moins 
disert mais très bien fait. 


L'impression d'ensemble que l'on retire de ce langa- 
ge, passée la période d'adaptation, est excellente: 
FORTH tient peu de place, va vite et est d'une puis- 
sance fabuleuse; il n'y a pas un octet que vous ne 
puissiez lire et modifier (en RAM, bien-sur et à vos 
risques et périls) ce qui en fait un bon outil 
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d'exploration, dans un premier temps seulement car il 
serait dommage de le limiter à ce seul usage. 


Le dernier numéro du Computer Journal de PPC USA nous 
apprend qu'une ROM FORTH existe à l'état de prototy- 
pe. Il existe dans cette ROM un vrai assembleur qui 
permet de créer de nouveaux mots-clé BASIC. La sortie 
commerciale de cette ROM n'est pas encore assurée, si 
celle-ci vous interesse faites-le savoir à: 

Dave CONKLIN 

Route 3, Box 598A 

CORVALLIS, Oregon 

USA 
ou à moi, pour centralisation (ce n'est pas une com- 
mande mais une étude de marché!); son prix pourait se 
situer autour de $100/150. 


CRE 
2 TEXT FORMATTER 


Le texte d'Eric GENGOUX qui suit est une introduction 
au module de Traitement de textes qui est le premier 
disponible en France (les modules MATH, VISICALC qui 
semble remarquable, TELECOMMUNICATION devraient être 
disponibles sous peu). 


£ HP 75 -— HP 75 - HP 75 à 
BANC D’ESSAI DU MODULE "TEXT FORMATTER" 


C'est le premier programme disponible en 
France sous forme de module enfichable. Votre 
serviteur ayant pu, non sans mal d'ailleurs, se 
procurer l’un des (trop) rares en circulation, 
voici un mini-banc d'essai, rédigé comme il se doit 
avec l'aide du bestiau soi-méme (c'est bien le 
moins!). 


Four un petit peu moins de 1100 Frs TTC (prix 
en vigueur au mois de juin), il m'a été livré une 
boite carrée, gainée de toile grise, portant des 
inscriptions dorées comme une édition de luxe, 
abritant un classeur semblablement habillé et sa 
notice de 74 pages, une carte aide-mémoire du 
format bien connu, un cache-clavier, deux cartes 
magnétiques contenant les affectations de touches 
des fonctions du module et un fichier dénommé 
"HELP" (très prometteur, ce nom...), plus bien 
entendu le fameux module, à enficher tout 
simplement dans l'un quelconque des trois ports 
situés sous la barre d'espacement. 


L'ensemble permet à l’heureux possesseur d’une 
imprimante HF-IL "sérieuse" (au moins 80 colonnes, 
soit par exemple HF 82905 R, SICAFE GF 100 A, mais 
AUSSI la mini-table trasante de ce dernier 
constructeur, ce qui est bien pratique pour se 
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contréler chez soi quand la "grosse" est restée au 
bureau...) de créer lettres ordinaires ou 
"personnalisées" avec nom et adresse variables, 
courts rapports tels que celui-ci, et autres. 
Première limitation, assez évidente: il vaut mieux 
que TOUT tienne en mémoire. Y compris l’éventuel 
petit fichier séquentiel d'adresses dont il sera 
parlé à la fin. Far contre, finies les crises de 
rage parce qu'il faut retaper cette sacrée pages 
mal présentée ou pleine de fautes; adieu le blanc, 
la colle et les ciseaux, les enveloppes faites à la 
main! A nous les modifications de dernière minute 
(avez-vous un patron qui ADORE déplacer des 
virgules?); il nous suffira désormais d’insérer ou 
de supprimer par octet ou par ligne entière dans le 
fichier TEXT où nous travaillons. Ajoutez toutes 
les possibilités de votre imprimante favorite: 
vous avez remarqué qu'il y a des minuscules 
accentuées? Eh bien, elles sont accessibles 
directement au clavier il faut rapprocher les 
séquences de touches des pages 289 à 291 du Manuel 
HF 75 et le jeu de caractères de votre imprimante 
(par le code décimal, bien sûr), ou consulter 
directement le tableau de correspondance qui 
apparait par ailleurs dans ce NUMÉTO. Bref, vous 
obtenez un beau texte, par exemple justifié droite 
et gauche en 130 mm de large. comme l'exige notre 
rédacteur en chef. 


Gardons-nous de tout optimisme exagéré, 
cependant: ce programme N’EST FAS un vrai 
traitement de texte, mais plutëét un "éditeur 
orienté texte", aux fonctions assez simplifiées: 
mais, tel qu'il est, il "valorise" déjà grandement 
imprimante et fichiers TEXT. KHien sûr, on peut 
réver: ah, s'il ÿ avait une gestion d'écran digne 
de ce nom: la possibilité de déplacer des 
paragraphes complets "comme sur les grosses 
bécanes"... Ceci étant, le produit reste simple et 
sa notice très claire (bien qu'elle ne soit pas 
encore traduite en fran$ais)s: il fait fort bien ce 
qu'on lui demande, ne se "plante" pas, pardonne 
bien des erreurs de manipulation et ne présente pas 
de "“piéges" majeurs. 


Venons-en à ce qu'il sait faire: 


Le programme a pour nom "FMT75"3 il peut donc 
ètre appelé directement par un programme en Basic 


(ceci permet de mieux utiliser les fonctions 
graphiques de l'imprimante, de fusionner ou 
d'enchainer plusieurs textes ou d'utiliser le 
formatteur comme simple éditeur... EHien entendu, 


on peut l'exécuter directement au claviers; dans ce 
cas, il vous demande le nombre de copies désirées 
et sur quel fichier vous voulez travailler (par 
défaut, il indique le fichier TEXT en cours). Par 
exemple, ce banc d'essai s’appelant tout banalement 
ARTICLE", voici comment je l'ai "lancé" au 
clavier: 


> run “FMT 35" 
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FILE , # OF COPIES ; JAÏRTICLE , 4 






Le 75 place le curseur sur le nom du fichier 
courant; n’en désirant qu’une seule copie, je ne 
spécifie rien et fais directement CRTNI. Le 
message "FORMATTING..." va rester affiché pendant 
la sortie à l'imprimante (A propos, si vous aviez 
oublié de configurer, tout va défiler à grande 
vitesse sur l'écran!). À la fin, le message 
"XXDONE**" apparait à l'écran. 


Quant au texte lui-méme, il a été saisi comme 
un fichier TEXT habituel, SANS SE SOUCIER du 
contenu final des lignes qui seront imprimées, et 
en particulier des coupures de mots: ceci est le 


räle du programme, qui est renseigné sur les 
longueurs de ligne ou de page, débuts des 
paragraphes, sauts de lignes. indentations, 


changements du mode de travail (entendre par là 
justification, centrage. "fill mode" ou recopie) et 
par des instructions commensant toutes par un "*", 
insérées dans le texte, autant que possible au 
début d'une ligne de fichier (Rappel: AUCUN 
RAFFORT avec les lignes du texte résultant. La 
syntaxe est la suivante: 





On se souviendra que le signe #"*", s°il n'est pas 
situé au début d'une ligne, risque le plus souvent 
d'étre interprété comme un caractère, de méme que 
le mot-clé qui suit et les paramètres numériques, 
qui sont alors restitués au beau milieu du texte 
imprimé. Donc, par prudence, toujours placer les 
instructions au début d'une ligne nouvelle de votre 
fichier TEXT de travail. 


Tout ceci étant bien aride, voyons plutét 
comment a été créé le début du présent banc 
d'essai: 


46 APLI255 définit la longueur de page et les en- 
29 AMA 42 57 [têtes en branc… 
3$ À CO ESC k3S ne et taïlle earactëres du titre 
4 A CE #vHP 75% HP... 

Sp BANC D'ESSAI... titres en mode “centrage” 

6$ A CO EsckÿS rebour en caractères de täille normale 
79 A MA 15 65 maraes du texte 

89 A JU ASK4 mode “qustification" et saut 1 fiane 
9# À PAS C'est le premier. debut paragraphe (retrait 5 0... 


J'ai déja parlé des minuscules accentuées: 
j'ajoute que d’intéressants caractères spéciaux, 
comme les N-tilde, voyelles accentuées espagnoles 
et autres ? et ! inversés, sont accessibles par le 
méme moyen, sans avoir à utiliser la fonction 


CHRS& (nnn)! Avec quand mème quelques surprises sur 
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les premiers 75, qui paraissent refuser certaines 
séquences de touches pourtant garanties par 
Grand-mère HF (celles des fameuses pages 289 et 
suivantes du Manuel !). 


Ajoutons que toutes ces fonctions peuvent étre 
assignées à des touches, et que le cache-clavier 
standard fourni avec la carte F7SKEYS est fort 
utile. Faites comme moi, rajoutez au feutre fin 
les caractères accentués courants obtenus par la 
séquence: 


CSHIFTJ CI/RJ suivi de LCCTL] [touche] 


ainsi que les séquences d'échappement donnant 
caractères condensés ou larges. 


Venons-en à ces fameux fichiers d'adresses! 
D'un cétés on a un texte à personnaliser 
(appelons-le PM"LETTRE"), de l'autre, le fichier 
d'adresses. Ce dernier est organisé en “articles”, 
chacun d'eux l'étant à son tour en "champs". 
Chaque "champ" est précédé par un "caractère de 
substitution" qui marque son début et permet de 
l'appeler dans le texte, au moyen de son numéro 
d’ordre dans l'article (par exemple avec % comme 
caractère, %1 serait le NOM, %2 le PRENOM,  2%35 
1° ADRESSE, 24 la VILLE. L'article concernant 
l'auteur de ces lignes serait le suivant: 


ZGENGOUX Eric 28 rue de Furstenberg ZFARIS, 


et le fichier "LETTRE" pourrait commencer ainsi: 
46 cher Monsieur %2 %14, 
2# ASK3 APAS Votre dernière contribution à PPC-T.... 


A noter que si les champs d'une méme adresse 
peuvent étre utilisés dans le désordre (appel par 
leur numéro), par contre le fichier est, lui, 
strictement SEQUENTIEL., sans possibilité de 
sélection directe. D'où l’'intérét de travailler 
sous Hasic pour créer ce fichier, ainsi que des 
extracteurs appropriés. Certes, c’est un peu 
laborieux, mais la sécurité est assurée: vous 
extrayez les seuls articles qui vous intéressent, 
recopiez le tout ligne par ligne en plasant en téte 
de chaque champ les indispensables caractères de 
substitution, et le tour est joué. 


Ma conclusion personnelle est que j'aurai pu 
préparer ce petit bout de texte en plusieurs fois, 
sur un coin de table et méme dans le train (donc 
sans prise de courant à portée, mais sans risquer 
de tout "planter" faute de sauvegarde “comme avec 
un plus gros"; j'aurai pu également me relire chez 
moi sur la mini-table trasante SICAPE précitée, 
seule imprimante 80 colonnes à tenir dans ma 
serviette, corriger le tout, fournir à notre revue 
préférée un copie au format correct et incorporer 
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toutes modificatins de dernière minute sans avoir à 
“tout retaper". Mon plus gros regret est assez 
mince, puisqu'il concerne en fait l’indigence _ du 
vidéo HF 82165 E, qui ne permet pas l'édition et la 
correction directement à l'écran et n'affiche que 
des "pages" minuscules (15 lignes de S2 
caractères): c'est assurément peu ergonomique, et 
j’ai personnellement dü renoncer en pratique à me 
servir de cet appareil, sauf en première saisie de 
texte ou programme. Mais tout compte fait, l’écran 
une ligne du 75 et la souplesse de ses fonctions de 
curseur font qu'on n'est pas vraiment géné. 


A votre disposition à tous pour d'autres 
tuyaux et... HAFFY TEXT FORMATTING. 


Eric GENGOUX (Ti36) 


Fans Deux petits détails ayant leur 

importance: d'abord, le signe " " entre deux mots 
s’imprime en blanc, MAIS évite au programme de 
placer les deux mots sur deux lignes différentes; 
enfin, vous l'aviez compris, le programme utilise à 
fond les "césures sur blanc", en essayant de caser 
un maximum de mots ENTIERS dans la ligne (compte 
tenu des paramètres “MA...), et considère deux mots 
reliés par ce symbole #" " comme un seul mot (il 
sort des injures si le total dépasse la capacité de 
la ligne, d'ailleurs, et il convient de modifier le 
fichier pour que "ÿa rentre"!)... 


3 PROGRAMMES 


Le programme qui suit est dû à de Michel MARTINET. Il 
permet, en utilisant le fichier LEX I/0O Utilities, de 
lister et de modifier le contenu de n'importe quel 
octet de vos cassettes. Je pense qu'un bon exercice, 
pour les possesseurs de }1 qui pensent que le BASIC 
ne vaut rien (ce qui est peut-être vrai), serait d'en 
faire autant! 


Les enregistrements sont numérotés de 0 à 511, les 
octets sont numérotés de 0 à 255. 


En mode "RUN' les touches suivantes sont redéfinies: 


— incrémente le pointeur d'octets; à l'octet 255 
le pointeur revient à l'octet 0 du meme 
enregistrement. 


— décrémente le pointeur d'octets; à l'octet 0 on 
passe à l'octet 255 du même enregistrement. 


: réecrit l'enregistrement en cours et passe à 
l'enregistrement suivant. A l'enregistrement 
511 on revient à l'enregistrement. 
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FET 


réecrit l'enregistrement en cours et passe à 
l'enregistrement précédent. A l'enregistrement 
0 on passe à l'enregistrement 511. 


déplace le pointeur d'octets à la position 
demandée. 


SHIFT FET déplace le pointeur d'enregistrement à la 


EDIT 


SHIFT 


ATTN 


On o 
suiva 


ENR-N 
posit 
point 


sur 1l 


position demandée. 


permet de modifier l'octet sur lequel on est 
positionné. 


ATIN fin de programme réecrit l'enregistrement 
courant et rembobine la cassette. 


arrete le programme sans réecriture. 


btient dans chaque cas les informations 
ntes: 


NN OCT-NNN CHR$-NNN X 2 
ion des valeur décimale et alphabétique 
eurs de l'octet 


‘affichage suivant: 


HEX-NN 
valeur hexa 


de 1! 


1000 
1010 
1020 
1030 
1040 
1050 
1060 
TO 1i 
1070 
1080 
1090 
1100 
1110 
1120 
1130 
1140 


octet. 


DIM E$L2561,R$C2561,D#C21 

INTEGER A,B,C,D,E 

RESTORE 10 & A,E=0 & GOSUB 1590 

GOTO 1490 

GOSUR 1520 

E$=ENTIO$(":C1","TAD#,DDTO,SDA") & R$=ES$ 
C=NUM(ES$CE+1,B+11) &@ IF C=8 THEN D$="ES" & GO 
00 

IF C=10 THEN D$="LF" &@ GOTO 1100 

IF C=13 THEN D$="CR" & GOTO 1100 

IF C=27 THEN D$="EC" ELSE D$=CHR$ (C) 

IMAGE *ENR-’,32Z,X,"OCT-", 32 

DISP USING 1100 ; A,B: 

DISP USING "* CHR-",3Z,X.2A" :; C,D$: 

D=C DIV 16 & E=RMD(C, 16) 

IF D<10 THEN D$[1,11=STR#(D) ELSE D$C1,11=CHR 


$ (D+55) 


1150 


IF E£10 THEN D$[2,21]1=STR$(E) ELSE D$[C2,2]=CHR 


$(E+55) 


1160 
1170 


DISP “ HX-";:D$ 

D$=KEYS$ & IF D$="" THEN 1170 

IF D$=CHR$(132) THEN 1330 Phoïs Are 

IF D$=CHR$(1233) THEN 1340 

IF D$=CHR$ (1354) THEN 1320 

IF D$=CHR$(135) THEN 1300 

IF D$=CHR$& (137) THEN 1440 

IF D$=CHR$# (169) THEN 1470 

IF D$=CHR$(131) THEN 1270 

IF D$=CHR$ (160) THEN GOSUR 1520 ELSE 1170 
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1260 SENDIO ":C1","LAD#,DDL7","" &@ END 
1270 DISF USING 1100 ; A,B: 

1280 INPUT " CHR-",STRS(C):C 

1290 E$LEB+1,B+11]=CHR$(C) 

1300 IF B=255 THEN B=0 ELSE E=B+1 
1310 GOTO 1060 

1520 IF B=0 THEN EH=255 ELSE ER=B-1 
1330 GOTO 1060 

15340 GOSUR 1520 

1350 IF A=511 THEN A=0 ELSE A=A+i1 
1360 GOSUB 1590 

1370 GOSUR 1520 

1380 GOTO 1050 

1390 GOSUR 1520 

1400 IF A=Q0 THEN A=511 ELSE A=A-1 
1410 GOSUR 1590 

1420 GOSUR 1520 

1430 GOTO 1050 

1440 DISP TAB(9):°"OCT-": 

1450 INPUT "",STR$(H):EH 

1460 GOTO 1060 

1470 GOSUE 1520 

1480 GOSUR 1590 

1490 DISF *ENR-°; 

1500 INPUT "",STR$#(A)3;A 

1510 GOTO 1040 

1520 IF E$=R$ THEN 1580 

1530 SENDIO ":C1","LAD#, DDL4",CHRS& (MOD(A DIV 254,2 
) ) &CHRS$ (MOD (A, 256) ) 

1540 SENDIO ":C1","LAD#,DDL3","" 
1550 SENDIO ":C1",'"LAD#,DDLE","" 
1560 IF R$=CHR$&(14) AND E$="!" THEN 1580 
1570 SENDIO ":C1","LAD#,DDL6é" ,E$ 
1580 RETURN 

1590 E$="!" &@ R$=CHR$(14) & RETURN 


Ed.Notes: 

les caractères de code décimal 10,13 et 27 sont rem- 
placés par LF, CR et EC pour éviter les problèmes 
d'affichage. 

Sans vouloir me substituer à l'auteur, il me semble 
que la ligne 1180 devrait être: 

IF D$=CHR$(132) THEN 1390 

et d'autre part les informations recueillies sont 
exactes à une rotation près, en effet Michel ne gère 
pas le pointeur d'octets de la cassettes, si bien que 
l'octet baptisé 0 peut êtreéen fait n'importe lequel; 
on peut corriger ceci par: 

1045 SENDIO ":C1","LAD ,DDL3",CHR$(0) 

1540 SENDIO ":C1","LAD ,DDL3",CHR$(0O). 

Un tel programme est un outil précieux pour la récu- 
pération d'informations. En effet, un fichier purgé 
ne l'est pas physiquement: seul son code fichier est 
mis à 00 00 (octets 10 à 11 du directory); il suffit 
de lui redonner sa valeur d'origine pour retrouver le 
fichier si vous réagissez assez vite,sinon la place 
peut-être prise par un nouveau fichier. 
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Eric ANGELINI T 210 
14, Avenue Marianna 
06000 NICE 

Tel : (93) 53.07.99 


Amis du H.P. 75, Bonjour |! 


Voici un microarticle qui va tenter de 
combler une autre lacune du BASIC du 75 . Lorsque l'on 
veut effectuer une saisie (par INPUT), il est impossible 
de rentrer une opération telle que 13 x 17 . Il faut 


saisir le résultat, mais non l'opération . 


Pour résoudre ce problème, une première 
solution consiste à utiliser l'astuce du programme FI- 
NANCE (listage page 308-311 äu manuel) . Cette astuce 
consiste à utiliser le traitement des chaînes alpha- 
numériques, puis de brancher sélectivement à une ligne 
effectuant l'opération choisie. Ceci est valable 
lorsqu'on utilise un seul opérateur . Mais à partir de 
deux opérateurs, Ça se complique ! (Priorité, nombreuses 
lignes de programme). 


Il est plus simple d'utiliser l'analy- 
seur du H.P. 75 lui-même . Pour cela, je vais me servir 
de TRANSFORM (Et oui, encore !) et du registre RES 
(équivalent du LAST X, H.P. 41) . Le listage suivant 
utilise DEF FN pour rendre cette astuce plus polyvalente. 


10 ASSIGN # 1 TO "D" 
. 


100 INPUT ® RESULTAT ?"; R$ 


110R=FNI (R $) 
k 
‘ 


200 DEF FN I (A f) 

210 TRANSFORM “D” INTO TEXT 
220 PRINT#1,1:A$ 

230 TRANSFORM “D” INTO BASIC 
240 CALL "D" 
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250 FN I (A #) = RES 
260 END DEF 


Voilä, je pense que le listage parle 
de lui-même . 


Pour conclure, deux petites remarques: 
- La fonction CLEAR KEY $ n'apparaît pas dans les manu- 
els, mais elle existe.Son utilisation m'est encore 


obscure . 


- De même, si vous tapez une ou deux virgules, puis RTN 


vous obtiendrez un écran rétréci . 
Voilà, j'en ai fini . 


Bonne rentrée à tous ! 


T.210 
Ed.Notes: 


Quelques remarques sur ce deuxième programme: 
ajouter: 215 A$="DISP "&A$ 

lire : 250 FNI=RES 

Ces deux corrections faites, vous constaterez que 
c'est une solution astucieuse. Le DISP est indispen- 
sable car RES n'est mis-à-jour, pendant l'execution 
d'un programme, que par DISP ou PRINT. 


} EN BREF 


- Des informations intéressantes sur le 75 se 
trouvent dans le HP JOURNAL de Juin 83 (26 pa- 
ges en anglais). 

- PPC USA devrait publier sous peu les listings 
et la documentation (HP) du système d'exploi- 
tation. 

- En dépit de plusieurs courriers je n'ai obtenu 
aucune information sur la ROM danoise en parti- 
culier sur l'état d'avancement du projet. 

- Le Computer Journal de PPC est édité par PPC 
USA, le coût annuel est de $37. Si vous êtes 
déjà membre de PPC USA, envoyer directement 
votre obole, sinon demandez un bulletin 
d'adhésion à Jean-Daniel. 


J. Taillandier 
9 Rue DELEZENNE 
59000 LILLE 
(20) 93-78-60 
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Aude OISEL (P 52) 

5, Lu Nouveaux Houjous 

ELANCOURT 78 310 - MAUREPAS Le 7 Cpreutre 1983 
TA: 16/3-050.21.16 


Dusou : 16/3. 462:70.00 (puit 3986 } J.D. DobiN” 


77 , Rue du Cogrra 
RIlOD - TOULOUSE 


sde Pus'teotut 


lou oe Ca reuur'ou du 3/3 à RONAGNE , } ou’ eaux dos: al Cariree 


a PPC-T a' Rauk LEBASTARD); cc afin ole rnceuvin € Toumal 
e'tit pes TouLousE. 


9 ‘ou’ egotausaut wglo ns ons poux ruveuvier , Se houËte, Éx llction 
oLeparis € chtut. D une fauco e: , Qu us ot 
$ , Aae aoŒuu un collotiou ot PPC.US, 

Ja t acluus eu. peut la trpua cl'uua Haocluct Fa fait ave 
us où au fs , os L'uliele a PRISHA due Rnb ecD. 
J'uiagiue qu'uus du fumé du clut ppe oluioit te 
ol'ougouuten du coopua trou pour €a tua cle él avc, 
Mod L'owruo ques m4 La fui euurta Loeu loin . Rotut senwarz 
osent ua auvdlula 821834. Tacques VAUCELLE <urus parte ox 
HPIL cvelopuuut aurclul ComoLi-1S047) , 24... 


de Joue Can cluës PPC ouf ua acte Fat à édit _— 
osiie ou ju ir vàa a'uù da HP + 

Peu fa , AP ut ox ox «Tee e 4 ufruua tt du Lu 

at cut nl Sn dé Ps 
Douu ef uit, L'oi | à P. CUEZ ke fa: Russe 
ol Ca auotoes FA. Dune logpu, . Le ee 


: eut Avoir  n Le 
"af peu duo Cruun ole HP. FRANCE. Abel fr, 


AAATUAS din 
Ut d'adnmu puuntue eutna € Ragion os 


Cuuus cafrumaut FT 
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PROJET ROM DU “COMPUTER CLUB DEUTSCHLAND" (CCD) 


Je voudrais aujourd'hui vous présenter un projet 
dont quelques membres et les signataires se sont 
déja occupés depuis quelque temps : La réalisa- 
tion d'un module pour la HP-41 avec des fonc- 
tions programmées en langage machine. 


Pendant le “ler Personnal Computer Symposium” de 
HEWLET-PACKARD, qui a eu lieu fin février à 
Frankfort, où notre club avait un stand, de nom- 
breuses occasions se sont présentées de parler 
avec les différentes personnes de HP. 


C'est ainsi qu'il nous a été donné des assuran- 
ces pour soutenir la demande aux USA, concernant 
la volonté de HP de produire un tel module, et 
sous quelle forme ; et de plus nous faciliter 
éventuellement le travail en nous fournissant 
d'autres documents sur la HP-41. 


Le samedi 26 février 83 a eu lieu à Glashütten 
une rencontre entre : 


Wolfgang Baltes 155) 
Roland Freytag 1064), 
Ulrich Jansen 283), 
Peter Kiefer 958), 
Wilfried Kôtz +); 
Andreas Marktscheffel (69) 

et Ralf Mulch 886), 


au cours de laquelle a été constituée une pre- 
mière liste de fonctions pour faire une ébauche 
du projet. 

(1) 


Voici ce qu'il en est ressorti : 


ROUTINES SYSTEME : 


CATALOG Affichage des modules enfichés ; 
Listage des fonctions d'un seul 
module. 

SAVE STACK Sauvegarde temporaire des regis- 
tres de la pile. 

RECALL STACK Rappel des registres d'une pile 
sâuvegardée. 

SWAPSTK Echange de la pile actuelle avec 
une pile sauvegardée. 

PASSWORD Calculateur utilisable seulement 


sur introduction d'une suite de 
symboles (définis par l'utilisa- 
teur) . 


Retour du calculateur dans un état 

défini ; 

ÉÉRNREE SEINE des programmes 
perdus". 


CRASH RECOVER 


Echange de deux blocs d'affecta- 
tion de touches. 


SWAPKA 


Activation / Désactivation des af- 
fectations touches pour les deux 
rangées de touches supérieures. 


DEFAULTKA 


PACKKA Compactage des registres d'affec- 
tation de touches (éventuellement 
automatique lors de la mise en 
route du calculateur). (3) 
Fourniture du nombre de registres 
non encore utilisés. 


FREE 


RUN Exécution d'un programme spécifié, 
se trouvant alors, soit dans la 
mémoire principale, soit dans la 


mémoire extension Üx-MEMORY). 
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1) J'ai repris, avec l'aide 

‘un de mes fils {qui fait des 
études supérieures d'allemand 
littéraire) la traduction de 
l'article de PRISMA (03.05.8°?) 
reproduit dans JPC-VIN4. 


Nous avons veillé à coller au 
texte original, parfois au dé- 
triment du style du Français. 


Je ne prétends pas à la per- 
fection. 


Je ne ee que si — comme nous 
le souhaitons tous - une coo- 
pération s'instaure avec 2105 
amis Allemands dans la créa- 
tion d'un tel module, les con- 
tacts formels utilisent plutot 
la langue Anglaise. Ceci peut 
minimiser les risques de mau- 
vaise compréhension (de part 
et d'autre, et envers HP}. 


Je précise que je ne pratique 
pas l'Allemand parlé. Mais je 
me débrouille pour l'Allemand 
technique (avec un bon dic- 
tionnaïire et à condition de 
maitriser le sujet). 


11 faut insister sur la néces- 

sité de la rigueur et de la 

precision pour la réussite de 
‘entreprise. 


KKXKkkKkERKEXX 


La liste ébauchée par le grou- 


) de de Glashütten mérite déie 
e 
m 


e nombreux commentaires. 

e suis généralement limité à 
ce qui est utile à la compré- 
hension du texte original. 


KKXKkkKRKREX 


(2) Evite l'inconvénient de 
CAT 2, qui liste les fonc- 
tions de tous les modules. 


(3) Je crois (à vérifier) que 
ce compactage est fait natu- 
rellement lorsqu'on relit des 
affectations enregistrées par 
WSTS HERO TRE DE CARTES) ou 
WRTK (MEMOIRE DE MASSE). 


sos À ses 


ROUTINES ALPHA : 


Une idée générale serait d'implémenter un mode (4) Ceci résulte de la consta- 
ALPHA spécial, de sorte qu'en se plaçant, en tation évidente que sur la ma- 
pus en mode USER, on ait accés à toutes les chine actuelle, le mode USER 
ettres minuscules (touches non shiftées) et à n'apporte rien en mode ALPHA. 
d'autres symboles spéciaux (touches shiftées). 
À La proposition permet théori- 
Cette fonctionalité sera toujours présente lors- uement de doubler le nombre 
que le module sera enfiché e telle sorte e caractères ALPHA directe- 
qu'elle sera active aussi bien lors de la créa- | ment accessibles à partir du 
tion d'un programme que dans le chargement usuel | clavier, alors qu'il faut au- 
du registre ALPHA. (4) jourd'hui recourir, soit au 
NAND (à condition d'avoir les 
Ceci permet, par exemple, d'insérer sans diffi- | codes barre), soit à ACCHR si 


culté des minuscules dans le texte du programme. | l'on travaille directement a- 
vec l'imprimante, soit à XTOA 
(module XFUNCTION), soit, plus 


OUTREC Fourniture d'un enregistrement généralement, à la programma- 
ASCII (X-Function). (5) tion synthétique. 

EDIT Edition directe d'un fichier Toutefois, l'emploi de cette 
ASCII. nouvelle fonctionalité restera 


toujours pénalisée par les li- 
mitations propres à l'affi- 
PRA. Print Alpha avec soulignement cheur. 
automatique ou, dans le cas d'une 
interface video, représentation 
video inversée. 
(5) Le nom de la fonction sug- 


ARCLINT ARCLX en format FIX O sans point ace un jumelage entre les 
décimal, mais sans modifier les onctions OUTA (HPIL) & GETREC 
status d'affichage. (XFUNCTIONŸT+. Serait trés in- 

teressante pour du traitement 

ARCLHMS ARCLX en format Deg / min / sec. de texte, surtout si l'on peut 


transférer des enregistrements 


longs, en une seule fois, et 
ROUTINES MATHEMATIQUES : sans faire usage du registre 
ALPHA. 
XYZCW Regroupement des trois registres 
ile XYZ dans le format du nombre 
e contrôle standard XXXX.YYYZZ. 
CWXYZ Décomposition du nombre de contrô- 
le standard dans ses trois compo- 
santes. (6) (6) Cette fonctionnalité est à 
considérer avec SWAPSTK. 
D-H Conversion d'un nombre de base 10 
en base 16. 
H-D Conversion d'un nombre de base 16 (7) Les angles d'EULER (pré- 
en base 10. cession, nutation, et rotation 
propre), s'utilisent en astro- 
REC-SPH Transformation de coordonnées, de nomie, ainsi que dans le cal- 
Rectangulaire en Sphérique. cul des transmissions mécani- 
ques par cardan. 
SPH-REC Transformation de coordonnées, de 
Sphérique en Rectangulaire. 
EULER Calcul des angles d'EULER-CARDAN.(7) 
(8) La méthode de HORNER est 
HMSRND Arrondi dans le systeme sexagési- |l'illustration éclatante des 
mal (hh,mmss). avantages de la Pile Polonai- 
se, qui permet de fournir in- 
SIGMA Rappel des différents registres déFiniment la variable (par 
statistiques. duplication automatique du 
registre T) lors du calcul 
LINREG Regression linéaire. d'un Des de degré quel- 
conque. On n'utilise les RL 
SOLVE Routine de base pour programmes de | Que pour appeler les coeffi- 


recherche de zeros d'une fonction. | cients. De plus, elle garantit 
généralement une meilleure 
INTEGRATE Routine de base pour programmes précision. 
d'intégration. 
(9) J'imagine que “/" signi- 


HORNER Calcul de fonctions polynomiales.( e : Inversion. 
(10) Une variante assurant les 
SUM Sommation des valeurs d'une fonc- conversions entre indices (i & 
tion. ) et numéro de registre dans 
e cas de matrices triangulai- 
MATRIX Introduction/extraction, +, -, *, res, serait fort utile. 


(9), Méthode du Pivot, conver- 
sion entre les adressages par ei 


dices et par registres. 10) see À asc 
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ROUTINES X-MEMORY : 


RENAME Changement (de nom) d'un fichier.(11) : 
nom 
COMPRESS Raccourcissement d'un fichier DA- 
TA ou ASCII. 
EXP AND Allongement d'un fichier DATA ou 
ASCII. 
CHANGE Modification du type de donnée.(12} 
ROUTINE IL (13) 
SLCTPR Sélection automatique d'une impri- 
mante. 
SLCTVI Sélection automatique d'un appa- 


reil video. 


ROUTINES SPECIALES 


LB Edition d'un seul Byte en code HEX 
ou en temps que symbole ALPHA. 

KA Affectation d'un code quelconque à 
une touche. (14 

PEEK Fournit la valeur d'un Byte spéci- 
fié par son adresse absolue. 

POKE Stocke un Byte dans une adresse 
absolue. 

PBG Acquisition rapide de données de 
mesure avec l'appareil PBG. (15) 

RCLABS Rappel non normalisant à partir 
d'une adresse définie, au choix, 
comme absolue ou relative, 

STOABS DM d'un registre en adres- 
se absolue. 

CODE Fabrication d'un code HEX quelcon- 
que. 

DECODE Représentation du contenu d'un re- 
gistre en code HEX. 

AND Fonction Booléienne sur les 56 
bits des registres X et Y. (16) 

OR Fonction Booléienne sur les 56 
bits des registres X et Y. (16) 

XOR Fonction Booléienne sur les 56 
bits des registres X et Y. (16) 

NOT Fonction Booléienne sur les 56 
bits des registres X et Y. (16,17) 


Naturellement, ceci n'est qu'une liste provi- 
soire. Le module doit être aussi pratique à 
l'usage que possible. Ainsi les fonctions 
d'impression seront compatibles aussi bien avec 
les trois imprimantes qu'avec l'interface video. 
Les messages d'erreur doivent si possible dési- 
gner exactement la cause. 


Ces exigences et l'abondance des fonctions sont 
si consommatrices de mémoire qu'un module 8k, si 
ce n'est même un module 12k sera à envisager. 


En dernier lieu, un domaine du éjetene du cal- 
culateur - celui du Service Module - sera égale- 
ment à envisager ; ce qui ouvre d'autres possi- 
bilités pi mentaires. Ainsi peut être réalisé 
une protection efficace du calculateur contre 

les usages non autorisés. (18) 


En tout, on peut ranger jusqu'à 127 fonctions 
dans un tel module. 
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11 faudra trouver un autre 
, car il est déja employé 
(MEMOIRE DE MASSE-HPIL). 


(12) Chansenene entre types 
DATA, ASCII et, pourquoi pas, 
PROGRAMME ; ce qui donnerait 
une autre façon (il y aurait 
déja PEEK et POKE) d'accéder 
au binaire des programmes. 


(13) Il serait fort utile de 
disposer d'une fonction per- 
mettant de “nettoyer” les cas- 
settes. 


(14) J'ai fourni au club un 
pos (XA/SA en P.S. avec 
FUNCTION) qui doit avoir cet- 
fonctionalité. 


PPC US vient de publier (Juil- 
let) un programme EZK (Pronon- 
cer : EA-SY-KEY ; Signifie : 
“Touche commode") ré igé dans 
le même esprit. 


(15) N'a certainement rien à 
voir avec le BYTE GRABBER. 
Pourrait concerner l'emploi 
d'un périphérique de mesure 
(genre HP 34214). PBG est pre” 
bablement le sigle Alleman 

de cet appareil (G pour Gerätt 
= Appareil). 


(16) Dans un module de cette 
classe, il faut également des 
fonctions du type LSHF(n) et 
LROT(n), n indiquant le nom- 
bre de bits du éplacenent. 


Je prépare un proie dans ce 
sens. Le HPIL development 
module a un ?OTXY. 


(17) Ne concerne sûrement que 
le registre X. 


(18) Je n'ai pas trés bien 
compris s'il s'agissait seu- 
lement de “mordre” dans l'es- 
pere d'adressage du Module de 
iagnostic (4XXX), ou d'incor- 
orer dans le module CCD des 
onctions de diagnostic entiè- 
rement refondues. 


(19) L'objectif est clair : 
Limiter à 2 le nombre de pré- 
fixes XROM (La 128° fonction 
sera le NOM du module en 
XROM XX,00). 


La liste rase comporte dé- 
ja 50 noms (dont certains ca- 
chent plusieurs fonctions). 

La décision finale sera donc 
difficile. 


ès À .. 


BONS DE COMMANDE 


Joindre une étiquette autocollante à votre adresse - tous les envois sont 
franco de port par voie de surface, ajouter 10% pour envoi par avion - tous 
les règlements doivent être à l'ordre de PPC-T. Entourer d'un cercle le 
prix de l'objet que vous voulez commander. 


Toulouse.(dans la limite des stocks disponibles) VIN1 à VINA ensembles 30F; 
N°2 à 10F; N°3 à 15F; N°4 à 15F; N°5 à 15F; N°6 à 20F; N°7 à 20F; 
N°8 à 20F. 


Librairie et coopérative: à envoyer à Jean-Yves Pasquier Apt.10, 2 rue de 
Grèce 31000 Toulouse. Lil: William Kolb, Curve fitting 2°édition 120F; 
L2: John Dearing, Calculator Tips and Routines 130F; LA: J-D Dodin, Au fond 
de la HP 41C 80F; L5: Keith Jarett, Synthetic programming made easy 130F; 
L6: Janick Taillandier, Autour de la boucle 80F; L7: R. Farrando 109 
programas 65F; LB: Wadman et Coffin An easy Course (HP41) 170F. 

C1: carte des codes HP 41 couleur 25F; C3: overlay en bristol perforé, les 
10 30F; C7: cartes magnétiques HP, les 87 cartes 250F; C9: Pochettes A4 
pour classeur avec 4 emplacements pour cartes les 10 50F; C10: classeur à 
anneaux spécial pour C9 (contient 25 feuilles) 50F. 


> >: 


Photocopies: à envoyer à Gilles Barret 92 av. de Muret 31300 Toulouse. 
P2: PPC East cost conference (Avril 82) 50F; P7: Microcode PPC: tous les 
roms HP jusqu'en 82 120F; P8: Microcode HP (ROMs internes, version 
HP) 220F; P9: documentation sur HP-IL Monitor 10F; P10: trésors cachés de 
la HP41C (1'OI) 15F; P11: manuel technique HPAIC 60F; P12: manuel du 
convertisseur HP-IL 25F; P13: PPC Southwest Conference (Janvier 83) 35F; 
P14: HP Journal Janvier 83 (HP-IL) en anglais 20F; P15: Dossier Hard 
(articles jusqu'en 82) 45F; P16: Album PPC-T 82 (1ère année du 
journal) 50F; P17: Album 83 (n°3 à 7) 85F. 


BORDEREAU DE SOUMISSION D'ARTICLE:A photocopier ou à recopier et à joindre 


à toutes les propositions d'article. Ceci est destiné à permettre un 
classement plus rationnel des articles du journal, comme le demande la 





grande majorité des adhérents. Soyez coopératifs, merci. N°T NOM: 
PRENOM: ADRESSE : 

L'article ci-joint doit, s'il est publié figurer dans la rubrique:(entourer 

le nom concerné) : Coin des U. PRO / nop / Trucs et astuces / 


sur le marché / microcode / programmes / applications / petites annonces / 
réactions / divers / autre rubrique: 

I1 concerne la machine: HP10 / HP11 / HP12 / HP15 / HP16 / HP41 / HP75 / 
HP85 / AUTRE HP: /AUTRE MARQUE: ACCESSOIRE REF: 

La publication des articles est soumise aux circonstances, selon l'appré- 
ciation de l'éditeur. Les articles proposés ne sont pas renvoyés. Toujours 
nous envoyer l'original, conserver la photocopie pour vous. Format: tapé à 
la machine sur 15 cm de large, avec un ruban trés noir, simple interligne, 
recto seul. A la main, calligraphié sur feuille quadrillée 5x5 sans 
interligne, largeur 15 cm maxi, recto seul, a l'encre noire. N'utilisez pas 
de couleur autre que le noir (nous n'imprimons pas encore, hélas, en 
quadrichromie! Les dessins à l'encre de chine sont fortement rechérchés 
(avez-vous de l'humour?). 
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L'ORGANISATION DE PPC TOULOUSE 
Cette page sera publiée dans chaque numéro de PPC-T. Seuls les produits 
répertoriés dans le dernier numéro du journal sont disponibles. PPC-T étant 
une association sans but lucratif, elle ne fait pas de bénéfice, elle est 
administrée par des bénévoles et ses produits et services sont réservés aux 
adhérents. La marge prise sur les produits vendus est minimale et destinée 
à couvrir les frais de fonctionnement. Une grande partie de nos produits 
vient des Etats Unis et leur prix est donc soumis aux variations du $. 
Consultez le dernier numéro pour connaitre le prix courant. En cas de 
variation brusque du $ nous nous réservons le droit de demander un 
supplément. 
ASSOCIATION PPC-T 
Association à but non lucratif (loi de 1901), PPC-T accepte des adhérents 
dans toute la France et à l'étranger. La cotisation, abonnement au journal 
inclu (6 numéros par an) est de: France et Europe 100 F (français), DOM-TOM 
et reste du monde par avion 150 F (français). Règlements par chèques et 
mandats postaux à l'ordre de PPC-T (eurochèques acceptés, mandats postaux 
uniquement pour les DOM-TOM). L'inscription prend effet au premier jour du 
bimestre qui précède la réception du bulletin d'adhésion (ler Janvier, ler 
Mars...). 
RESPONSABLES DE PPC-T 
Président: Jean-Daniel Dodin (T1) 77 rue du Cagire 31100 Toulouse 
(nouvelles adhésions, journaux de l'année en cours, édition du journal, 
réception des articles). 
Trésorier: Jean-François Sibille (T15) Résidence du pays d'Oc, rue des 
Genets 31500 Toulouse (renouvellement d'adhésions, problèmes financiers) 
Trésorier adjoint: Jean-Pierre Baudoin (T131) Lieu dit "Les Carabiniers" 
Castelnau d'Estretefond 31620 Fronton (fichier) 
Secrétaire: Jean-Luc Basso (T11) 4 rue Jacques Darré 31300 Toulouse 
(coordination des groupes locaux, compte rendus de réunions) 
Secrétaire adjoint: Gilles Barret (T22) 92 av de Muret 31300 Toulouse 
(photocopies) 
Secrétaire adjoint: Jean-Yves Pasquier (T18) Apt. 10, 2 rue de grèce 31000 
Toulouse (Librairie et coopérative) 
Programmathèque: Damien Debril (T33) 38 rue du 8 Mai 1945 59190 Hazebrouk 
Coordinateurs régionaux: 
Bretagne: Frank Lebastard (T35) 10 rue de la Jalousie 35600 REDON 
Paris: Pierre David (T353) 33 bd St Martin 75003 Paris et Edouard 
Cohen-Tannoudji (T102) 11 rue Wagner 93150 Blanc Mesnil 
Lorraine: Thierry Perthuy 18 av France Lanord 54600 Villers les Nancy 
Sud Est: Eric Angelini (T210) 14 av. Marianna 06000 NICE 
Besançon E. Pierunek (T76) adresse provisoire 10 allée de l'abbaye Parc 
Vauban 59380 Bergues 
Extrème est: Dominique Talon (T311) 90100 Courcelles 


Des coordinateurs sont recherchés pour toutes les régions (démonstrations, 
collections de journaux, réunions à organiser...) 


Detuiève minute : 


Etienne poupée s'est séparé de la SICAPE et a monté une nouvelle société, 
la S.C.I.P, 83 av de Paris, 94800 Villejuif. Tel (1) 677 68 O1 et (1) 


678 17 57. 


Cette société doit s'occuper du MLDL, du. boitier d'Eprom et de ce qui 


va avec. Les autres produits dépendent toujours de la SICAPE. 


Compte tenu du contentieux précédent, je souhaite être tenu au courant 
de vos relation avec Etienne, de façon à pouvoir définir clairement 


dés le prochain numéro notre position à ce sujet.. À vous la parole... 
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Pour pouvoir réaliser un module si possible 
értichent. nous demandons ici, chacun d'entre 
vous d'adresser des pes ositions et des souhaits 
sur les fonctions à implémenter à : 


Ulrich Jansen 
Mühlenstrasse 16 
5140 Erkelenz 


Bien entendu, il ne s'agit ici que des grandes 
lignes des objectifs. Sont-ils réalisables et 
comment, sera ensuite traité lors d'une étape 
ultérieure par les programmeurs des modules en 
microcode. 


L'idéal serait que vos propositions portent sur 
les points suivants : (2 


— Type de fonction, 
Que doit produire la fonction ? 


— Paramètres d'entrée. 
— Paramètres de sortie. 
— Messages d'erreur prévus, 


— Un exemple (en code touche HP-41 
normal) pour l'emploi des fonctions 
proposées, 


Ainsi, on devrait tenir compte du fait que, à 
cause de la programmation en microcode de ces 
routines sur la HP-41, des qualités et des pos- 
sibilités inhabituelles, toutes nouvelles, peu- 
“ent être dégagées. En d'autres termes, au moyen 
des routines m crocode, on peut obtenir des cho- 
ses jusqu'ici impossibies sur la HP-41. 


Les détails concernant notre nouveau projet ROM 
ne sont pas encore clarifiés ; nous vous tien- 
drons au courant dans PRISMA. 


Néanmoins, il est.sûr que la réussite d'un pro- 
jet aussi coûteux dépend de votre collaboration, 
et doit être portée par votre intérêt. 


C'est pourquoi, ici encore une fois, nous renou- 
velons notre demande : Prenez contact ; 


Soit avec Ulrich (voir adresse ci-dessus), 


Soit avec Wolfgang (Téléphone 089/7001540 
à partir de 19 heures). 


(21) 


Wolfgang Baltes 583)? 
Ulrich Jansen 283), 
Andreas Marktscheffel (69). 
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(20) La réussite d'un tel pro- 
jet repose en grande partie 
sur une définition saine des 
fonctions à créer. 


Il n'est pas indispensable de 
pratiquer le microdode pour 
celà. Une bonne expérience du 
langage externe est le meil- 
leur critère. 


Bien entendu, la connaissance 
du microcode peut infléchir 
certains choix, surtout si 
l'on recherche la vitesse 
d'exécution des fonctions. 


De plus, nos propositions 6- 
ventuelles seront plus crédi- 
bles, si elles uvent être 
supportées par des nn 
déja rédigés en microcode (qui 
seront probablement refondus 
lors de l'intégration finale). 


J'en suis personnelement au 
stade de l'apprentissage li- 
vresque. Aussi j'attends avec 
impatience que les actions 
lancées par le club, et aux- 
quelles je suis disposé à par- 
ticiper (Traduction du VSAM, 
disponibilité d'un matériel 
MLDL ou autre) aboutissent. 


11 faut que les Chapitres 
Français du PPC fassent bonne 
figure dans la démarche lancée 
par nos amis d'outre-Rhin. 


(21) Pour appeler de France : 
— Faire le 19 (Intnal), 
— Attendre la tonalité, 
— Composer 49897001540. 


(49 = RFA ; ne pas faire le 0 
qui précède 89). 


KRkXXKkKXXKXEX 


A. OISEL ( PPC=PC 52 }) 
Tel: 16/3-050.21.16 aprés 19h. 


l'article de Charles Close 


éponse à 
dans PPC US V9 N7 P38 qui signalait un Bug dans le 


Enfin, enr 


Pour un buffer de plus de 1000 octets, 


e 
° 


Monitor 


la fonction BSIZE? donne un résultat faux, on ob- 


tient la partie entière du size divisé par 10. 


J'ai cherché et j'ai trouvé l'endroit où ça coince. 


C'est en AA2C et suivant (jusqu'à AA3F). Je te propose 


une correction de ce Bug : 


AA2C Q@FE-3F2 C€2B MS 
AA2D 1FE-7F2 C=C+C MS 
AA2E 1FE-7F2 C=C+C MS 
AA2F @17-@53 JC +@2 
AA3@ 39A-E62 RSHFA M 
AA31 11C-47G R= 8 

AA32 @GA-922 A=G R€ 
AA33 134-4C@ LDI S&X 
AA34 @92-992 2 

AA35 35C-D7@ R=12 

AA36 342-Dÿ2 ?A#0 @R 
AA37 @27-Q93 JC +94 
AA38 3FA-FE2 LSHFA M 
AA39 266-992 C=C-L S&x 
AA3A 3E3-F83 JNC -04 
AA3B 226-892 C=C+1 S&Xx 
AA3C 0G@-@6P NOP 

AA3D @BA-2E2 A<>C M 
AA3E @SE-172 C=Q MS 
AAGF 3E@G-F8@ RTN 


Je me suis très fortement inspiré de ton programme 
R?, paru dans PPCT N3. À propos, le NOP est-il vraiment 
indispensable? pour moi, non, mais je me trompe peut-être, 
En guise de conclusion, le club est promis à un avenir 
radieux, peut-être qu'un jour, nous aurons nous aussi un 


vrai TOULROM manufacturé par HP. 


Amicalement, 
1 
T 189 Hme ch tlo@on. 
€ 


P,S,. IL ne faut pas abuser des bonnes choses !!! 


‘1! Dans P3, 
tu propose un programme "ASS" comme celui de AF, mais 
utilisant des fonctions de TOULROM. Les lignes 101 et 102 
sont savoureuses : CLX REP, pas mal, mais il existe une 

fonction qui s'appelle CLST, si mes souvenirs sont bons, J 


> A 
à moins qu'il n'y aie une ruse?? £a chautk poto Seau ae | 
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Philippe (T198)GIRARDET 


54, rue PILLET 
71000 MACON 


Objet: ASSEMBLEUR/DESASSEMBLEUR pour HP-41 C 


L'idée originale de départ de cet ensemble de 
programmes est bien sur "AU FOND" où j'ai puisé le 
code de toutes les mnémoniques "PPC'"'et tout le voca- 
bulaire. 

Bien sur, tout ceci demande une réorganisation 
complète pour entrer dans le petit (mais costaud) 
cerveau de notre HP-41 préférée. 

L'ensemble de programmes est conçu sous forme de 
module et je n'ai pas recherché l'optimisation à tout 
prix: considérez donc cette étude comme une étude 


de faisabilité. 


La structure même des micro-instructions est com- 
plexe. Les problèmes étaient les suivants: 
A) quand on a le code machine en héxa "244" comment 
déterminer la mnémonique correspondante. 
Bi à partir d'une mnémonique concevoir un programme 


qui rende le code héxa "244", 


Le premier problème est un simple décodage (en 
première approche) 
1) on entre le code héxa "244" 
2) on le transforme en binaire 
3) on décode les deux derniers bits (poids faible) 
&) on obtient le type d'instruction 
5) on formatte la chaine restante à 8 caractères en 
ajoutant éventuellement des "f" en tête. 
6) on sépare les huits bits en deux groupes suivant 
le type d'instuction 
a) Si type Y : +4 sauf sous classes 


b) Si type 1 : 8+ introduction d'un nouveau code 
"2LL4" avec décodage comme en 1 
c) Si type 2 : 5+3 
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d9 Si type 3 : ‘7+1 


Instructions de type 
17181214 12121118 188 


instr.bb pare.kb 


FICHIER ASCII "CODEHP" 


type 2b 


Vpécs IX 1 ALPHA 

& fN0P après ATOX: 1321N0P 

1 FCLRF 1781CLRF 
2 FSETF 17G1SETF 
3 F?FSET 17417FSET 
& DLDeR- 1681LDaR- 
5 F?R= 17217R= 
60 1161 

7 FR= ÉTILE 
8H 1721 

9 DSELP 1681SELP 
18 RURIT [B2IURIT 
11 F9FI 17017FI 
12 X 1881 

13 8 1161 

14 RREAD 1821READ 
15 FRCR 17BIRCR 


paramètre"D": (LBL6EB) "f1234567B89ABCDEF" 


paramètre"F": (LBL?7f) nédRéArxTIT A Ne à 


paramètre"R": (LBL82) "TZYXLMNOPQ+abcde" 
instructions de type"8" (LBL16) 
11H 


À 81111121 1ZIB! 


Anstr.=16 :position 6 
Cosvenétrempngt tion dans tableau-16(8) 
instructions de type°H" (LBL72) 
L D 4H ! 1! 


RTE 1112182181 1g1g1 
instr.=72 :position 8 
Lusansère- pass tiun dans tableau-72(H) 
instructions de type"X" (LBLB8) 
DE 


ns 4 1111129191 12181 
instr.-88 :position 12 
| paramètre-=position dans tableau-B88(X) 


une série de tests inclue dans le sous-programme 
LBL7Y permettre de détecter les cinq instructions 
spéciales suivant la valeur de l'instruction lorsque 


le paremñgee sgre ag} fnér (15) 


si instr.-=2 : "MCLRKEY" 
si instr.=3 :"2KHEY" 

si instr.-=5 :MR=R=- 1" 
si instr.=7 :"R=R+ 1" 
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Instructions de type 1 
IFIEIDICI IBIAI9181 19111 


type 1 
Ca bits de s ids fatble 
2 


0 
1721615141 131 


11181 IGICI 





condition IBIBI ?NC XQ 
19171 ?C XQ 
11121 ?NC GO 
11111 ?C GO 


8 bits de poids fort 


instructions de type 2 


 — type 2 
nimes bits= position-64 


instruction 5 bits Le position-32 





instructions de type 3 
1615141312111@1 ICI 1111! 


type 3 
condition I@I JNC 


111 DC 


saut 7 bits :si saut +grand que 64:5=-5-128 
:si saut inf/- à 64:5=5 


eme 


2 problème: ASSEMBLEUR 


1) on entre une mnémonique en slpha 

2) on lève le flag d'erreur 25 

3) on stoke la chaine alpha dans un registre 

4) on éxecute indirectement le sous-programme qui 
correspond à la mnémonique 

5) on teste le flag 25 

6) si le flag est à zéro: la mnémonique est dans le 
fichier "CODEHP" 


7) la position de le mnémonique dans le fichier 
permet de trouver son code décimal 

8) selon ce code on introduit un paramètre (de type 
D,F ou R) ou bien la mnémonique du champ. 

9) pour l'instruction "LDI Sex" le programme 
demande l'introduction d'une donnée. 


J'ai été contraint d'adapter légèrement la calli- 
graphie des mnémoniques PPC pour pouvoir les entrer 
directement au clavier sans compliquer inutilement 
les programmes. 


ainsi: 8 = e 
B = a 

lors des sauts positifs le signe "+" est sous en- 
tendu. 

lors du calcul des adresses (type 1) les "f" qui 
se trouvent en tête du nombre héxa ne sont pas affi- 
chés. Par contre, la valeur décimale des sauts et des 
adresses figure à chaque foi entre parenthèses. 
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Dans le programme d'assemblage, les nombres 
peuvent être introduits soit sous forme héxadécimale 
soit sous forme décimale, dans ce cas il suffit de 
faire précéder le premier chiffre du nombre par le 
signe "%n", 


Exemples: 


SAUT ? "F* R/S 
SAUT 7? "#18" R/S 
DATA ? "41" R/S équivalent à "%X65" R/S 


Suivant leur valeur les "DATA" sont affichées 
soit par un caractère salpha-numérique "microcode" 
soit par un caractère ASCII (modulo 128) pour ne 
pas perturber l'imprimante. Le caractère est précédé 
de sa valeur décimale. 


La mnémonique "CHRS F" permet de calculer le code 
héxadécimale "244" du caractère marquant la fin d'un 
nom de fontion (ajoute 88ÿ). 


MODE OPERATOIRE ASSEMBLEUR/DESASS EMBLEUR 
A) ASSEMBLEUR: 


La première opération conciste à entrer le fichier 
ASCII, taille 194, nommé "CODEHP" 


Ne possédant pas (encorel) de cassette-drive je n'ai 
pas jugé bon de le sauvegarder sur cartes magnétiques 
car le programme que je possède si il fonctionne très 
bien demande trop de registres pour la transf orma- 
tion .Même manuellement, l'entreprise n'est pas 
insurmontable . De toute façon je me suis arangé pour 
que le fichier soit valable pour les deux programmes. 


Il suffit ensuite d'entrer les cartes magnétiques 
dans l'ordre et de faire GTO.. après chaque WORKING. 


Le programme "ASSEMBLEUR" est conçut pour pouvoir 
tourner sans imprimante, dans ce cas il faudra con- 
server manuellement les réponses. 


Une foi le programme en MEV convenablement packé et 
et le fichier "CODEHP" en XMEV; il suffit de taper: 
XEQ "ASSEMB" 


1123456789012112345678901211234567890123456789012341 


mn et cnseeluncen mme 
TE UE M mms 
rio 
Res RS 0 noces 
RE nan Le mmesemcammms 
LAORESSE 7, 11148  1SA0 ZA 20 un 
nn ass Se nn Le ERSE 
OR ns mn nés 
IPARAMETRE _F?12 1290. _?FSET__2 ( 


IMNEMO 7? 1 A=A+B ! l 


PRE Ru 1 PE ut 
mére mime sine À 
DENROREIRE nrie UT DE EE res 
2ONEND 7, IN LL INT MR OL el 
ae ne ee top iccmmie eRcrS 
TRE ones mesennh 
ETE »s 


Vous pouvez constater que cet assembleur respecte 
les mnémoniques "PPC" (à quelques fantaisies d'affi- 
chage près). 

Lorsque l'imprimante est connectée, seules les 
instructions assemblées sont imprimées. 

I1 restera à adapter ce programme pour pouvoir 
ecrire directement dans le MLDL (Mr POUPEE de la 
SICAPE m'a dit qu'il me l'envoyait de suite...Il a 
déjà trois semaines de celal). 


B) DESASSEMBLEUR: 


Le fichier "CODEHP" étant en mémoire (XMEV) il 
suffit d'introduire les cartes magnétiques (ou 
d'entrer les programmes à la main...La programmation 
synthétique est réduite à la portion congrue) et de 
faire GT0O.. après chaque WORKING. 


Le programme "LOAD" permet un désassemblage auto- 
matique en permettant de mettre 32 (ou plus après 
modification du compteur) code hexadecimaux "244" 
en mémoire. Mais le decodage peut aussi se faire 
code après code (flag 'USER' armé) . 


mise en route: faire XEQ "DESAS" 


111234567890 121 1234567890 121 1234567890123456789012341 


JQUESTION_HP_IREPONSE_UTILI _DESASSEMBLAGE __________! 
RO RE nmmnnmnmm mn an D 
nn cumin ee 
notant 
it rss ne 
JEtc.::_______________---_1310_PW2_3C8_3CC _W5C_____1! 
JILIGNE:32___ 1308 _________! 05A_308______! 
urine lemme SR ER 
rase te dans IE  mnamnl 
une ont ES RES RS 
Émis hausse 
Ps amende ul 
El nt al  S 
L l IXEND WRITEX 
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Introduction d'une série de code héxa "244" grâce 


au programme "LOAD" 


2EC 
@9c 
22@ 
818 366 
867 366 
JiD 665 


QIF 
cc 
830 


EL: 
19 
56 
3ë1 
2F 
3C8 


GIE 
cc 
1&E 
646 
e11 
3CC 


f 
291 
847 
138 
138 
ac 
65€ 


@SA 316 


ENE LD 333 


2 FRE s4. 24 à 
Décodage en mode AUTO des codes héxs grâce au 


programme "GET" et "DESAS 


2EC FI 13 
GIF JC #3€3; 
280 ?FSET € 
EIB JNC #3€7} 
39! 
ESC HO KE :27E< 
ëCC YFSET ji 
ISE JC 43351; 
3CC KEY 
GAS JHC 414486; 
226 C=kKEY FF 
e3L FCF 3 
ASE CsÉ & 
6 REC 5e? 
fI 
r 


CE ONE 
EE CE 
43 Lrar- 
*EKE NRLTE* 





1 <ir. 


soit 19MN et 125 pour 32 codes 
(2365 par instruction) 
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8ieLBL “CODEHP" 
CF 48 


G3eLEL I 

SF 25 EMDIR FC?C 25 
GTO 92 188 Xx:Y° 

GTO 83 "CODEHP* CRFLAS 
GTO 88 


14eLBL 62 
"+XFONC SVP= AVIEH 
TONE d TONE 9 SF ii 
OFF GT0 D 


2?4LEL 93 

“ide XMEY SVP“ AYIEN 
BEEP SF 11 F5? @8 OFF 
SF 88 GTOD 


31+LBL 81 
APPREC AYIER RTK 


35+LBL 86 

“#RECCORD*" AVICH 

" NOP* XEG 81 "“FCLRF* 
XEQ 91 "FSETF" XE8 Bi 
"F?FSET" XE0 &i 
“DLDaR-" XEQ Gi “F?R=" 
XEQ 81 “6” KEQ &i 
"FR=" KXEQ 81 “H” 

KEQ 41 “DSELP* XE0 Bi 
"RHRIT" REG 81 “F?FI" 
REQ 81 "X" KXEQ 81 “B* 
XEQ 81 "RRERD &EB Bi 
“FRCR" XE@ 81 “?+" 

XEQ 81 “G=C aR,+” 

XEQ Qi “C=G aR,+" 

XEQ 81 “C{2G aR,+" 

KEGQ 81 “?+" XEQ BI 
"N=C ALL" &EQ 81 

"C=H ALL" &EG 81 

"CON ALL XEQ gi “?+" 
XEQ @1 "T=ST" KXEG &i 
"ST=T" XEQ @1 “STCT" 
XEQ 81 “?+" XEQ 8l 
"ST=C KP" 4EQ 61 

"C=ST XP" XEG 81 
"COST XP" EG 81 

"A=8" KEQ 61 “B=8" 
KEQ 81 “C=@" XEG BI 
"ACB" XEG 81 “B=A" 
XEQ 81 "ACC" RKEG 81 


“C=B" 
*E0 81 


"A=A+E" 


XEQ 81 


“R=A-B 


KEQ 61 


"C=C+C" 


KEQ 8i 


-C=f-C" 


KEQ 81 


"C=-C-1" XEQ 81 “?B+8" 


KEQ 81 
“2A<C" 
XEO 81 
"20€" 
KEQ 81 


“RSHFC" 


XER 81 
"Sex" 
XEQ 4i 
-P-Q" 

XEQ @i 
HS" 

XEQ 81 


XEG 81 “CCE” 


"A=C" KEO 81 


KEG 41 “A=A+C" 


“A=A+1" &E0 Gi 


KEG 81 “A=A-1* 


“A=A-C" XEG BI 


XEQ Q1 “C=C+f" 


"C=C+1" REG 8 


KEQ 81 “C=C-{" 


"C=8-C" XEQ Bi 


"208" XEB BI 
KEQ 61 “?A<B" 
"#8" XEG 81 
KEQ 81 “RSHFA”" 
"RSHFB" XEG 81 


KEQ@ 81 “LSHFA" 


“ar XE0 8j 


XEG 81 "R<” 


"ALL" XEG 8i 


XEQ 81 “XS" 


"N° KEQ Gi 


KEQ 81 “x0-G0* 
“POHOFF“ XE 8! 


“SLCT P" KEQ 81 


“SLCT @" KEQ 81 “?P=8" 


#EG 81 
KEG @i 
XEQ 81 
KEQ 81 
*EQ 81 
KEQ 81 
KEQ 81 
XEO 81 
XEQ 81 
XEQ 81 
XEQ 81 
x" 

XEQ 81 
XEG @1 
KEQ &1 
XEQ 81 
KEQ 81 
XEQ 81 


“?L0HBAT" 
“A=B=C=8" 
“GOTO ADR" 
“C=KEY KY”° 
"SET HEX° 
“SET DEC” 
“DSP OFF" 
“DSP T0G* 
"?2C RTN° 
"NC RTN° 
“RTH” KEG &i 


XEQ @1 "“N=C ALL" 


“CN ALL" 
“CON ALL* 
"LDI Sex” 
“PUSH ADR" 
“POP ADR° 
“?+" KXEQ 8 


"GOTO KEY" X%EQ 81 


"RAM SLCT" KEQ 81 *?+" 


XEQ 41 
XEO Bi 
XEQ @i 
XEQ i 
XEQ 81 
KEQ 81 


“HRIT DATA” 
“FETCH Sex” 
“C=C OR A° 
“C=C AND f° 
“PRPHSLCT" 

“+ END LOAB *° 


AVIEN BEEP FIX 8 


CF 29 
END 


“CODEHP" PCLPS 


PPC-T Noëg 
NOVEMBRE DECEMBRE 
1983 P43 


#RECCORDx 
NOP 
FCLRF 
FSETF 
F3FSET 
DLDaR- 
F?R= 

8 

FR= 

H 

DSELP 

RHRIT 

F?FI 

£ 

8 

RRERD 

FRCR 

+ 

G=C 3F:+ 

C=G ak,+ 

C£>G aR:+ 

2% 

M=C ALL 

C=# ALL 

CE>N ALL 

% 

T=ST 

ST=T 

ST£ÈT 

7 

ST=C %P 

C=ST %P 

COST &P 

A=8 

E=8 

C=8 

RACE 

B=A 

RC 

C=B 

CB 

A=C 

f=A+B 


?C+8 

AC 

2f<B 

2h44 

244€ 
RSHFA 
RSHFB 
RSHFC 
LSHFA 

3R 

Sex 

R< 

ALL 

P-0 

xS 

K 

#5 

*0-G0 
POHOFF 
SLET P 
SLCT 6 
?P=0 
2LOHBAT 
A=B=-C-8 
GOTO ADR 
C=KEY KY 
SET HEX 
SET DEC 
DSP OFF 
DSP TOG 
2C RTN 
?NC RTK 
RTH 

+ 

H=C ALL 
C=N ALL 
CON ALL 
LDI Sex 
PUSH ADR 
POP AIR 
7% 

GOTO KEY 
RAM SLCT 
+ 

HRIT DATA 
FETCH Sex 
C=C OR A 
C=C AHD A 
PRPHSLCT 
+ END LORD * 


XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXKXKXXXXXXXXXXXXXXXNXXXX 
PROGRAMME DE DESASSEMBLAGE POUR CALCULATEUR HP-41C * 
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXKXXKXXXXXXXKXXXXXXXX 


FRGGRAMME CE 
DESASSEMELAGE 


EHTREE CODE 
HEKR 49 DAHE 
ALFHA 


TEST FE FOUR LOI 


AFFICHÈGE 
MHEMONEICULIE 


LEL" 
LEL” 
LEL" 


ERD 


LEL" 
LBL" 
LEL" 
LEL" 
LEL" 


ENI 


LBL" 
LEL" 
LEL" 
LEL" 


ER 


LBL" 
LEL" 
LEL" 
LEL" 


EHD 


DECAS 
STORT 
FIX 
133 EYTES 
INPUT 
x-L 
D-* 
H-B 
E-H 
19 BŸTES 
C=10 
DT! 
SEP 
JC 
217 BYTES 
#8 
T2 
ERF 
LPRIHT 
246 EYTES 


LEL'TE 
LEL"? 


LEL 
LBL" 


EMI 


LOfl 
GET 
298 BYTES 


LEL'CHF$ 


ENT 


LEL" 


EI 


ë 
. END. £7 BTTES 


191 BYTES 
PRIHT 


JL 


UTre 
TES 
Lure 
TTE 
L2 


"5m 


Bie+LBL “DESAS" 

CF 29 FIX 8 

“A:UTO H:ANU ?° 

KEQ INPUT" ADY ATOX 
65 K=Y? GTO “LOAD* 
SF 27 


12+LBL 88 
“CODE HEXA ?° 


14+LBL "START" 
KEQ "INPUT" @ XF 16 
STO 81 REG “H-B" 
RCL 88 1823 K<Y? 
GTO “ERR" FS?C 86 
GTO “CHR$" XEQ "C=18" 
KEQ “DTI" FS? 81 
GTO “X@" KEQ “SEP" 2 
STO 81 XEQ “x-D" 
STO 82 CLA ARCL 83 
KEQ "X-D" STO 83 
F5? 83 XEQ “JC” 
XEQ “Ta” F5? @2 
KEQ “T2” 


F5? 88 


46eLBL “FIN* 

F6? 55 KEQ “LPRINT" 
FC? 55 PROMPT GTO 88 
.END. 


81+LBL “INPUT” 


ENTREE DE OCGNNEE FC? 27 CTO Bi 


EN ALFHA 
B4+LBL 88 
CF 23 AON PRONPT 
FC? 23 GTO 86 AOFF 
F5? 55 ACA 2 F5? 55 


SKPCHR RH 
17eLBL 81 
S1 EXECUTION KEQ “GET+ RTN 
AUTOMATIQUE 
CONUERSION 
BASE+"RAl" à sn ES 


SÉRIHORSESS CLST ALENC XOY 


e4eLBL a 

ATOX 48 - 17 <=? 
KEQ b RDH + RCL 81 * 
DSE Y GTO a RCL 81 / 
STO 88 GTO d 


4ielBL B 
SF 86 


43eLBL b 

CLX 7 FC2C 86 CHS 

ST+ Ÿ RTH 
CONUERFETOH 
DECIMALEPES à 
ÉEASE+"FEl" 


J8+LBL "D-X" 
RCL 88 CLA STO Z 


54eLBL © 

REL Z STO Ÿ X=8? 

GTO d REL Gi MOI 

ST- Ÿ 48 + 57 KX{Y? 
XEQ B RDN XTOA REL 81! 
ST/ Z -1 AROT RD 
GTO c 


COHUERSION 75+LBL d 
HE*# A à EH RTH 


77eLBL “H-B" 
16 STO 81 KEQ “x-D" 2 
STO 81 KEQ “D-X* RTH 


COHUERETUH 
EIN à HE*“A 


85eLBL *B-H* 
2 STO 81 XEQ "K-D” 16 
STO 81 XEQ@ “D-X* .END. 
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INSTRUCTIONS TYPE D gjelel “T6” 


POUR "NOP" 


SI PARAMETRE "F" 
SI"Fn=15 


SI PARAMETRE=15 


RETOURNE LE CHRS 
ASCII DU PARAMETRE 


I PARAMETRE "D" 


5I PARAMETRE "MR" 


INSTR=12 (X) 
INSTR=8 (H) 
INSTR=60u13(8) 


5I PAS D'INSTRUC. 


MEMORISATION DE 
CODE 244 POUR 
EXECUTION AUTO 


"CODEHP" RCL 83 
SEEKPTA GETREC RTOE 
KEQ IND X 68 POSR i 
K=Ÿ? SF 68 RTK 


144LBL 32 
RTH 


16+LBL 76 
RCL 82 15 2#=Y7 
CLX XO I 
“eaBealarxodés" “hret” 
SF 12 KEQ C ARCL 2 
RTH 


GT F 


ë3tLEi F 

RCL 63 ! K=Y? *£T=8" 
CLR 3 X=Y? *CLPKEY: 
CLR 3 X=Y? “?KET" 
CLX S X=Y? ‘“R=E-1" 
CLX 7 R=Y? “R=F+]° 
RTH 

SitLBL C 
RCL 62 AROT CLX RTOà 


RQY CLA XL € 
ALENG - 


62+LBL 68 
++ DSEX GTO & 
FS?C 12 RTH 4) 
XTOR RTR 
fieLEL 66 
CLK #0) | “G125456783" 
“HABCDEF" XEQ € RTR 
FetLEL 82 
CLR #€> D  “TZYALMNOPO" 
“Hkabcde* XEB C RTH 
B5eLEL 65 
66+LBL 72 
87eLBL 16 
RCL 62 + CLA SEERPTR 
GETREC 42 POSA X=8? 
XEQ “2 RTK 
38+LBL “?" 
*? * KEQ “CHRS” 
ARCL 62 *+-" ARCL 63 
+ TYPEG" RTH 


186+LEL “LORE* 
SF 27 48 PSI2E 7,038 
j 


1124LBL A 


LIGNE: * ARCLE 


KEG "IHPUT” 
ASTO IHDY 1 + ISGY 
GTO A “END LI 5° 

ARCL à AYIERH ZT FRC 
ü + STO 86 CF 27 

GTO “START” 


RIK 


132eLBL *GET* 
JSG äé GTO E GT C 


{36eL8L B 

CLA % ARCL IHS € 
ALENG FS7 55 ACA - 
FS2 55 SÉPCHR RTH 
147eLBL C 

SF 27 BEEP 

"*EUL HEITE*" AVIER 
GTO "DESAS" EHI 


FORMATTE A DIX CARAC= PI*LBL "CI" 


TERES UN NOMBRE 
GINAIRE EN ALPHA 
AJOUTANT DES "fn 
TÊTE 


DETECTE LE TYPE 

D INSTRUCTION EN 

DECODANT LES DEUX 
DERNIERS CARACTER 
DE LA CHAINE (BIN 
EM ALPHA.SAUVEGAR 
LA VALEUR EN LEVA 


1@ ALENG - FIX IND% 
FRC ARCL X 18 LASTX 

- AROT ATOX CLK 

F5? 36 SICH FS? 27 
SIGN FS? 38 SIGN 

FS? 39 SIGH K+0? ATOr 
FI 8 RTN 


EN 
EN 


26+LBL "IT" 
“H, -3 AROT ANUN 
SF INDX ROY “Htæx” 
ES  AROT ASHF ASTO &E 
) ASHF ASTO 63 FS52C 18 
DE SF @2 FS5?2C 11 SF 63 
NT RAIN 


LE FLAG CORRESPONDANT 


SEPARE LA CHAINE( 
DANS ALPHA EN DEU 
GROUPES SUIVANT LE 
GPE(FLAG) 


IN'STRUCTION TYPE 
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44+LEL "SEP" 
BIn)CLA ARCL 82 ARCL 63 
x CLST FS? @R “+H++e” 


FS? 82 “+étes” F5? 83 
"Héte6te" KE D KO 
POSA AROT XCdT KO! 
@ POSA AFOT ASTO BI 
EIH X%X:) [ RTK 

3 éEeLEL "JC* 
RCL @Z 64 #77 Ci» 
x=60? GTO I CLY 126 - 
ST0 Ÿ 
FaeLEL ] 


RDN STO 42 AÀES 57C 4 
ié STD 6i KES *D-?” 
ASTO K CLA RCi 67 
X=B? “JHC s" X26? 
"JC 4" CLX RÈL GE 
ACT “He AECL Ÿ 
ARCL @£ ‘“H}" EHf 


sRÇe 


INSTRUCTION TYPE 1 


RETOURNE EN ALPHA LE 
CARACTERE * MIŒROCDHDE Y 
DONT LA VALEURE DEUMALE 
EST EN REG S'IL exis TE 
OU PLACE EN ALPHA LE 
CARACTERE SCI DoNT LA 
VALEUR NUMERIQUE EST 
EN Roë L'Mb9DL 428) 


ANSIQUE LA UALEURE DXGMALE 


BI+LEL *xe" 
F5? 55 PRBUF CLX X()F 
CLX (> 82 X() 84 
XC) 83 KÇ) 85 

"#LIGHE 2 SYP° 
KEQ "INPUT" REC “H-B° 
XEQ “DTI* CLA ARCL 82 
ARCL 83 ARCL 84 
ARCL @5 KEQ "B-H” 
ASTO * F5? 88 “?NC #0” 
FS? @1 "?C xkQ" F5? 8e 
“2HC C0" F5? 63 
"2€ GO “+ :" ARCL X 
GTO “FIN” RTK 


344LBL *T2" 

“CODEHP* RCL 62 JE + 
SEEKPTA GETREC 
ALENG - 


44eLBL 68 

“+ ISE X GCTO 88 
RCL 63 #4 + SEERPT 
ARCLREC  RTH 


S4+LBL “ERE* 
“ERFOP CODE” AYIER 
BEEP GTQ “DESAS* 


594LBL “LPRINT* 
19 ALEHG - ACA 
SKPCHR AIY EHI 
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Bie+LBL “CHR$" 

SF 25 RCL 88 16 
INT RCL 68 16 MOI 
XE@ IND Y FC?C 25 
XEQ@ A GTO "FIN" 


14eLBL 88 
“CABCDEFGH" “HI JKLHNO* 
KEQ € RTH 


19eLBL 81 
“PORSTUYHX" “FYZLNIT_" 
KE@ C RTN 


24+LBL 82 
“OUe##XE CT “Het, -,/" 
KEQ C RTH 


29eLBL 93 
"012345678" “H9::€=}9" 
XEQ C RTN 


34+LBL 84 

CLA “Hkabcde "TaË:z" 
“H#£a" KEG C 32 POSA 
#29? RTH CLX XTOA 
RTN 


46+LBL'C 
AROT ATOX CLA XTOR 
RTH 


J2+LBL A 

CLA RCL 88 128 HO 
KTOA “+ * ARCL 88 
END. 


B1eLBL "ASSENB" 

CLST FS? 89 GTO D CLA 
ASTO 84 ASTO 85 

ASTO 86 XC)F CF 88 
“HNEND 2?" KEQ INPUT" 
SF 25 ASTO 84 

GTO IND 84 FC?C 25 

GTO “T-T2" 


18eLBL “CHR$ F° 
SF 88 


28eLBL “DATA” 
SF 89 CLA ASTO &6 


24e+LBL D 
“DATA ?° 
GTO “CHR$" 


XEQ@ “INPUT" 


28eLBL “?NC xQ° 
88" ASTO 03 5F 81 
GT0 E 


33eLBL "?C k0° 
“gi” ASTO 93 SF 81 
GTO E 


38+LBL “?NC GO” 
18" ASTO 63 SF 61 
GTO0 E 


43eLBL “2€ GO" 
"11" ASTO 83 SF &i 
GTO E 


48+LBL “JHC* 
"811" ASTO 83 SF 83 
GTO E 


53eLBL “JC” 
"111" ASTO 83 SF 63 


J7#LBL E 

F5? 81 “ADRESSE ?" 
F5? 83 "SAUT ?° 
KEQ@ "INPUT" F5? gi 
GTO “Tf" F5? 63 
GTO *T3" 


67eLBL "TI" 

ASTO 66 CF 25 4 ALENG 
K)Y? GTO “ERR 2 K(Y? 
KEQ 88 ASTO 82 ASHF 
ASTO 85 CLA ARCL 82 6 
POSA AROT XEQ “H-B" 
“Hi” XEQ “B-H° 

ASTO 82 CLA ARCL 85 
XEQ “H-B" ARCL 83 

KEG “B-H" ASTO 63 

GTO “FIN* 


96+LBL 88 
“Hé0++" - AROT RTN 


NOM PROGRAMME GENERAL 
TEST POUR DATA 
STOCKAGE CLEAR 

RAZ FLAGS 


MISE EN FORME AFFICHAGE 
STOCKAGE MNEMONIQUE 
RECHERCHE: LABEL OÙ FICHIER 
SI MNEMO DANS FICHIER 


MNEMO POUR DATA +88ÿ 
PERMET MISE EN FORME PRINT 


MNEMONIQUE POUR DONNEE 
POUR PREPARATION PRINT 


POUR ENTREE DE DATA 


RECHERCHE CARACTERE 


POUR INFO 


POUR 


POUR 


POUR 


POUR 


POUR INFO 


AJOUTE 3BITS(CONDITION+TYPE) 
POUR PRINT DE LA LIGNE 


SAUT CONDITINNEL 
ASSEMBLEE 


! NOMBRE HEXA OU DECIMAL? 


4 
! INSTRUCTION DE TYPE 3 
l 
SI NOMBRE HEXA 
! SI NOMBRE DECIMAL 
{ SI SAUT NEGATIF 
DEC A BINAIRE 
SI NOMBRE HEXA 


COMPLEMENTAIRE 


INFO COMPLEMENTAIRE 


INFO COMPLEMENTAIRE 


CF 25 ASTO 86 45 POSA 
#8? SF 88 37 POSA 
#8? GTO 82 

CLST FC? 88 128 ANUM 
- ABS STO 88 2 

STO 81 %EQ@ “D-X" 

ARCL 03 KEQ “B-H” 

ASTO 82 GTO “FIN” 


181eLBL “T3" 
112eLBL 81 


INFO COMPLEMENTAIRE 


COMPLEMENTAIRE 


INFO 


COMPLEMENTAIRE 


INPUT DU SAUT OÙ DE 
L'ADRESSE 


INSTRUCTION DE TYPE 1 

XQ+G0 CONDITIONNELS 

SI ADRESSE SUP A "FFFF" 
SEPARE CHAINE CHRS "ADRES." 
EN 2 SI CELLE CI EST PLUS 
LONGUE QUE 2 CHRS 

AJOUTE LES BITS TYPE INSTR. 
AU PREMIER MOT 

DECODAGE DEUXIEME MOT 

ET MISE EN FORME REGISTRES 
POUR PRINT DE LA LIGNE 
ASSEMBLEE 

PERMET LA SEPARATION EN 2 


NOMBRE HEXA DE L'ADRESSE PPC-T HNoëg 
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TEST SI SAUT NEGATIF 
POUR HEXA A DECIMAL 


127eLBL 62 


FC? 98 ATOX 16 STO 81 
CLA ARCL 84 


RDN FC? 88 AROT 
KEQ “X-D" 


GTO 81 RTN 


148eLBL "TG-T2" 

ASHF  ASTO 85 CLA 
"COBEHP" @ SEEKPTA 
CLA ARCL 84 ARCL 85 3 
ALENG KC=Y? XEQ à 
POSFL INT STO 83 X<)T 
CLX XC=Y? KEQ 18 CLX 
32 K)Y2 GTO 11 CLX 
64 X3Y? GTO 12 CLX 
72 K)Y? GTO 13 CLX 
88 X)Y? GTO 14 SF 84 
12 STO 82 RIN 


181eLBL 15 

ST- 83 3 ALENG K=Y? 
DSE X 2 K=Y? ST+ 03 
FC? 68 GTO I SF 88 
GTO “T@" 


194eLBL à 
6 SEEKPT RTN 


198+LBL 18 
CLX 16 X)Y? GTO 16 
RTH 


284+LBL 16 

RCL 83 SEEKPT GETREC 
ATOX SF 98 CF 88 
GTO I 


212eLBL 11 
6 STO 82 SF 88 16 
GTO 15 


218eLBL 12 
SF 82 32 GTO 15 


222eLBL 13 
SF 88 64 GTD 15 


226+LBL 14 
8 STO 82 SF 68 72 
GTO 15 


232eLBL I 

“PARAMETRE *  KTOR 

FS? 82 “CHAMP “ “+?" 
KEQ “INPUT" ASTO 86 
FS? 92 GTO "T2" F5? 88 
GTO T8" GCTO “ERR° 


RO nn un un un 0e un nn dut un CS on on on 0 ou 8 CN Cu CD ou ou D ON Où onD OuD D D 08 on D Ou on8 Ou OS ou où où 0 où où on cs 


INSTRUCTIONS DE TYPE @ ET 2 
FIN STOCKAGE MNEMONIQUE 
APPEL FICHIER MNEMONIQUES 
RAPPEL DE LA MNEMONIQUE 
POUR BUG LIGNES 5 ET 7 
POSITION MNEMO DANS FICHIER 
TEST POUR CALCUL CODE MNEMO 


MNEMO DE TYPE n"X" 
VA A CALCUL CODE "24&4n 


CORRECTION BUG LIGNES 5 ET 
7 


POUR INTRODUCTION DU 
PARAMETRE 


SOUS CLASSE INSTRUCTION & 
EGALE A HEXA 6 "g" 


SI MNEMD DE TYPE 2 


SOUS CLASSE INSTRUCTION ÿ 
EGALE A HEXA 8 "Hn 


SOUS CLASSE INSTRUCTION ÿ 
EGALE A HEXA 8 


INPUT DU PARAMETRE OÙ DU 
CHAMP 
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327eLBL "KEY" 
3 ST0 83 GT0B 


331eLBL “R=R-1°" 
5 ST0 83 GT0B 


335eLBL “R=R+1" 
? STO 683 


338+LBL B 
15 SF 88 GTO A RTN 


245eLBL "TG" 
F52C 88 GTO “8” 
KEQ IND & 


249eLBL A 

STO 84 2 STO 6i 

KEQ “D-X" ASTO 82 
RCL 83 x<) 88 

KEQ “D-X" F5? 88 4 
FS? 82 3 KEQ “C=x" 
ASTO 83 CLA ARCL 82 
ARCL 83 FS? 88 “+88 
F5? 62 ‘“+H8" 
ASTO #2 CLA GTO "FIN" 


275eLBL 32 


276+LBL 68 
ATOX “8123456789" 
“HABCDEF" POSA RTH 


262+LBL 78 
AHUN  “eaBalarxobd:" 
“hueg" POSA RTN 


288eLBL 82 

82 45 ATOX x=Y? 

ST+ Z X=Y? RC 2 
“TZYXLANOPO" “Habcde” 
POSA RTN 


308eLBL “8” 
RCL 82 XK{) 83 GTOR 


304eLBL “T2” 

ASTO Y CLX “COBEHP" 
SEEKPTA CLA ARCL Ÿ 
ASTO 86 64 SEEKPT 


POSFL - ABS X<> 83 
GTO A 
319+LBL *ST=8" 


1 STO 83 GTO B 


323eLBL “CLRKEY” 
2 ST0 83 GT0B 


KEG “B-H” 


POUR INSTRUCTIONS TYPE @ 
REMISE EN FORME DES BITS 
CALCUL CODE PARAMETRE 


ASSEMBLAGE DES INSTRUCTIONS 
DE TYPE @ ET 2 ET MISE EN 
FORME DES REGISTRES POUR 
PRINT DE LA LIGNE ASSEMBLEE 


AJOUTE LES 2 BITS DU TYPE 


: POUR "NOP" 
: POUR PARAMETRE "DA 


: POUR PARAMETRE "F" 


:POUR PARAMETRE MR" 


REMET EN FORME CODE TYPE W 
MY2=PAR MP3=INS 


POUR INSTRUCTIONS TYPE 2 


: PERMET LE CODAGE DE LA 
MNEMONIQUE DU CHAMP 


INSTRUCTIONS TYPE @ EN 
LABEL 


MET LE PARAMETRE A HEXA F 
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SE EN FÜFPE POUR 
FFICHAGE 

FRE “FI 
J434LEL “FIN” 
“139 ASTO Y CLA 


ARCL 82 ASTO X KX=Y? 
SF 18 3 KXEQ “C=X" 

“+ * ARCL 64 FS7 83 
XEQ 03 F5? 88 KEQ &4 
F5? 62 KXEQ 64 F5? 55 
AVIEH FC? 55 PROMPT 
FC? @1 GTOF CLA 
ARCL 63 3 KEQ "C=X" 
+ :" ARCL 86 F5? 55 
AVIEN FC? 55 PROMPT 


377LBL F 
FS?C 18 SF 89 
GTO “ASSENB" 


381+LBL 83 
“+ +" ARCL 86 RTH 


385+LBL 84 

12 FS?C 89 KEQ G 
ARCL 45 ALENG - 
RTN 


x{=07? 


394eLBL C 
“+ SEX GTOC 
ARCL 86 RTN 


488eLBL G 
RCL 88 STO 85 FIX & 
RDN ‘+ :" RTN 


487eLBL “C=X" 
ALENG - 


418+LBL J 

x=8? RTH “+8” -1 
AROT RDN DSE X GTO 
«END. 





POUR UN AFFICHAGE AGREABLE DE 

LA LIGNE ASSEMBLEE, CODE "244% 
8139 POUR LDI : FORCE UNE ENTREE 
DE DATA 


IMPRESSION DEUXIEME LIGNE POUR 
XQ+G0 CONDITIONNELS 


SI EDI 1 


POUR LES SAUTS CONDITIONNELS 


POUR IMPRESSION CODE DECIMAL 
D'UNE DATA 


ALIGNEMENT DES INS TRUCTIONS 


1 PROGRAMMES COMMUNS AVEC 


1  DESASSEMBLEUR St UTILISATION 
1 MANUELLE DE CELUi-ci! 


ENTREE D'UN CODE ALPHANUMERIQUE 
CMNEMONIQUE , ADRESSE ,SAUT,ETC... 


81eLBL “INPUT” 


82+LEL 88 
CF 23 AON PROMPT 
FC? 23 GTO 88 AOFF 


SI PAS D'ENTREE BOUCLE A LBLB@ 
SI ENTREE RETOUR AU PROGRAMME 


RTH 
CONVERSION BASE QUELCONQUE EN 
18+LEL “X-D" M91 A BASE 19 (DECIMAL) 
CLST ALENG X<2Y 
14eLBL a 
ATOX 48 - 17 n<=Y? 


KEQ b RDN + RCL Gi * 
DSE Y GTO a RCL 81 - 
STO 88 GTO d 


SAUVEGARDE DU NOMBRE DECIMAL 
EN MYY FIN DE CONVERSION 


31eLBL B 
SF 86 


33+LBL b 
CLR 7 FC?C 86 CHS 


ST+ Y RTH 
CONVERSION DECIMALE (NOMBRE 


EN MYS) A BASE QUELCONQUE EN 
Mg1 


48eLBL “D-Xx* 
RCL 88 CLA STO 2 
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ddelBL c 

RCL Z STO Y Xx=8? 

GTO d RCL 81 MOD 

ST- Y 48 + 57 X{Y? 
XEG B RDN XIOA REL 8! 
ST Z -1 AROT RIK 
GTO € 


65+LEL d 
RTH 


674LBL “H-B" 
16 STO 81 KXEG "4-D° à 
STO 81 KEQ “D-X" RTH 


75+LBL *B-H" 
2 STO 81 KXE@ “x-D" 16 
STO 81 KEQ “D-X" .EHI. 





B1eLBL “CHR$" 
37 POSA K<8? GTOH 
ANUH 


87eLBL à 
STO 88 16 STO 4i 
REG *D-X" 


12eLBL H 
ASTO 82 16 STO 81 
XEG “x-D" 


i7eLBL D 
SF 24 RCL 88 16 

INT RCL 88 16 MOD 
KEQ IND Y FC?C 25 
KEQ A ASTO 84 4 KCÈF 
GTO “FIN” 


33+LBL 68 
“SABCDEFGH*  “+IJKLHHO* 
XER © RTH 


38+LBL Gi 
“PORSTUVHX" “FYZL\1t " 
#EG C RTK 


43eLBL 62 
"USSR "HO, 7" 
KEQ € RTH 


48+LBL 63 
"12345678" "H9::<=}7" 
XEQ € RTN 


J3+LBL 4 

CLA “Hkabcde "Tab:v* 
"H£4" RCL 88 POSR 
X(8? RDN XER C 32 
POSA X(8? RTN CLXx 
XTOR RTK 


FIN DE CONVERSION ? 


FIN DE CONVERSION ET RETOUR 
AU PROGRAMME 


CONVERSION HEXA A BINAIRE 
SAUVEGARDE DE LA VALEUR DEC 
EN MY 


CONVERSION BINAIRE A HEXA 
SAUVEGARDE DE LA VALEUR DEC 
EN M9ÿ 


FIN CONVERSION ET RETOUR 


CODE HEXA : ALLER EN H 


DE DEC A HEXA 


SI NOMBRE HEXA 
DE HEXA A DEC 


CALCUL POINTEUR POUR RECHERCHE 
SI CHR$S MICROCODE 


MISE EN FORME POUR PRINT 


CHRS MICROCODE 84 A 8&ÿF 


CHRS MICROCODE 819 A 81F 


CHRS MICROCODE 82H A 82F 


CHRS MICROCODE 8&3Y A 83F 


CHRS MICROCODE &84f A 84F 
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69+LBL C 
AROT ATOX CLA XTOA 


RTK SELECTION CARACTERE MICROCODE 


SUIVANT SA VALEUR DECIMALE 


75+LBL A 

CLA RCL 88 128 FC? 85 
HOD FS?C 88 XEQ d 
XTOA 4 X{2F RTN 


CHRS ASCII 


MISE EN FORME POUR PRINT 


POUR CARACTERE FIN DE NOM DE 
87eLBL d FONCTION 


2 4 - .END. 


UTILITAIRE PERMETTANT LA 
LECTURE ET L'IMPRESSION DU 
FICHIER ASCII "CODE HP" 


gi+LBL “PEINT" 


"HARE FILE 7°. 
AEQ "INPUT" @ SEEXFTA GENERALISATION DU PROGRAMME AVEC 
ATIEN AIY LE SOUS PROGRAMME "INPUT" 


BaeLEL 8 
CLA ARCL X 3 ALENG - 
FS? 53 GT 05 SI IMPRIMANTE CONNECTEE 
16+L8i Bi 
Ke97 “+H* SE X 
GTO BL! ARCLREC AYIER 
4) 4 + CTG 08 


ET+LEL 65 
SKPCHR “+ * CF 15 
ACR GETREL ©F !3 ACR 
PREUF CF 12 CE EC 
4 + GT 83 EH? 


SBR POUR IMPRIMANTE 





pas & pts magihi que pur “PRINT” 
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PPC SYDNEY 

HP41 Microcode 
Library "Index! 
P.0.Box C245 
Clarence ST. 


Sydney,2000, 
The Library Organiser New South Wales 
Your PPC Chapter AUSTRALIA 


Dear People, 

It has come to our attention, and 
supposedly yours, there is a definite growing 
need for a HP41 Microcode Routine Library. 

The nearest thing we could initially offer to do 
is a Library MINDEXM", 


The apparent current problem experien- 
ced by new programmers in Machine Language is the 
drudgery of re-inventing the wheel everytime, to 
enable him/her write new routine. It is also a 
fair assumption that great efforts can be duplica- 
-ted unintentionally manyfolds on the same 
routines. 


The answer is hopefully a HP41 
Microcode Library. If possible, the programs or 
routines could use the same standard format of 
documentation already well developed by the HP41 
Users Library. with this, it can be appreciated 
, it would only enhance the development of the 
HP41 Microcode further, if we only develop 
and/or improve new Microcode routines. 


Given it appears to be such a big 
task for anyone alone, its administration will 
be up to the participating Chapter or person. 
We would only offer initially to maintain a 
Central Library "INDEX". This lndex would consist 
of: i, tne routine's name ii)either new or an 
iuproved versiou iii) its abstact iv)peripueral(s) 
needea v, the person's contact address and 
vi, the fees tor duplication and postage or 
otherwise. 


We sincercly hope this scheme will 
prove Lo be successful just Like any other PPC 
activities. Could please present these words 
to your group and we look forward to your 
participation. Critics are welcome. 


Yours in Microcode 


B. PONS (10502) 
PEC SYDNEY 
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Franck Lebastard 
0672T35 Contact régional Bretagne 
10, rue de la Jalousie 
35600 Redon 
Redon, le 3 avril 1983 






Cher Jean-Daniel, 


Voici le compte-rendu de la réunion PPC qui 
s'est déroulée hiers, samedi 2 avril 1983 à 
Romagné, chez Jacques Vaucelle. 

Soulignons tout d'abord la grande gentillesse de 
Jacques qui nous prêté sa maison pour la journée 
et qui, par la même occasion nous a permis de nous 
réunir dans les meilleures conditions nossibles. 


A cette oremière réunion bretonne se sont 
retrouvés 7 membres PPC (2 personnes prévues n'ont 
pu venir par suite d'accident de la route, avec 
dégats vurement matériels heureusement). 

A noter que la présence de deux parisiens venus 
spécialement vour la journée a été particulièrement 
appréciée par tous. 

Dans le détail, étaient présents notre hôte 
Jacques Vaucelle (T106 et P?);Robert Schwartz de 
Bondy (T178 et P20):;0livier Pougeon de Quiberon 
(T62) ; Francis Rosange de Paris (P?) ; Daniel Georgelin 
de Quiberon (T57);Bruno Tredez de Blain (T120);et 
moi-même. 

Inutile de dire que le matériel rassemblé était 
impressionnant. Sur la grande table de la salle 
étaient réunis plus d'une dizaine d'HP-41 (C et CV), 
des modules math, navigation, x-fonctions et x-me- 
mory (plus d'une dizaine) ,Time (4),PPC rom(3),trois 
modules HP-IL, deux unités de cassette,des convertis- 
seurs d'interface, deux imprimantes hp-il, 1 imori- 
mante 136 colonnes 125 CPS hp-il,et bien entendu, 
de très nombreux lecteurs de cartes (pratiquement 
un par machine) et lecteurs optiques,des centaines 
de cartes magnétiques ... Je n'avais personnellement 
jamais vu autant de matèriels 41 réunis.Il nous a 
en plus été donné de voir le lecteur d'Eprom BE-01-4K 
de Didier Jeh1.550 f. est un prix vraiment très 
intéressant pour ce beau travail très soigneusement 
et très "professionnellement" réalisé. 

Le coté librairie était également fort bien 
pourvu puisqu'on y trouvait la totalité des livres 
parus sur la 41,français ou américains, certains 
étant même en plusieurs exemplaires, les numéros de 
PPC-T, de PJC, de PPC-US. 


La réunion a commencé vers 11 h.,heure à laquelle 
seuls Robert et Francis n'étaient pas arrivés.Partis 
vers 7 h. de Paris, ils ne sont arrivés à Romagné 
que vers midi 10.Après installation des différents 
matériels, chacun présenta aux autres le sien, ses 
programmes, ses astuces, ses trucs.Olivier nrésenta 
par exemple son programme de gestion de fichiers 
ASCII constituant un mini-éditeur de texte (ce prem 
et son@ article doivent se trouver ailleurs dans 
ce numéro de PPC-T).A noter également une astuce 
absolument géniale de Jacques constituant un système 
de révertoire de programmes et qui permet de faire 
partir un prgm automatiquement en l'appelant norma- 
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lement au clavier, et qu'il soit dans la mémoire 

vive, dans le x-fonctions, sur cassette, ou sur 

cartes magnétiques. Il suffit de placer le prem 
O1LBL'"EC" ci-contre en tête de la mémoire pro- 
02 "EC" gramme. EC et INVa représententdeux 
03 GTO O1 exemples de prgms placés en xmémory, 
04 LBL "INVa" ou/et sur cassette,etc.ON place 


05 "INVa" ainsi tous ces prgms les uns à 
06 GTO O1 la suite des autres.Le répert- 
= ——— --etc oire utilise trois lignes par 
07LBL O1 pregm,plus la partie "système", 
08 SF @ 25 du 1bl O1 au end final(19 lignes) 
09 GETP à ne pas modifier.L'utilisation 
10 FS?C 25 est fort simole, il suffit de 
11 GOTO 02 de faire XEQ" nom prem " tout à 
12 SF 25 fait normalement.Oùu que le prgm 
13 READP soit, il sera exécuté.Génial, 
14 FS?C 25 non ? On peut même utiliser ceci 
15 GTO 02 à partir d'un prgm;si celui en 
16 "+-CARDS:" cours demande à être remplacé 
17 -6 en mémoire centrale par le nou- 
18 AROT veau, placer dans le prgm 
19 TONE 8 GTO “nom nouv. prgm".L'excution 
20 PROMPT continuera à la ligne portant le 
21 ASHF label du nouv. prgm, après qu'il 
22LBL O2 aura écrasé l'ancien.Ce système 
23 ASTO Q est un exemole varmi toutes les 
24 GTO IND Q routines qui ont été présentées, 
25 END un exemple qui utilise des fonc- 


tions fort simples ,mais qui exploite une idée qu'il 
“suffisait" d'avoir. 
Après le repas, tout le monde étant là,les échan- 
ges d'idées et de programmes sec sont doublés de 
démonstrations de matériels. Chacun a alors pu voir 
l'efficacité de la boucle hp-il,de l'interface cas- 
sette munie de son pronre catalogue des vrgms et 
fichiers. Le fonctionnement de l'imorimante 136 
colonnes à lui-même été un "spectacle":voir la 
toute petite 41 gérer une boucle hp-il contenant 
la "grosse bête",qui de plus imorime plus vite qu! 
elle ne reçoit. Cette imorimante dont le prix s'ap- 
proche du milien imprime d'ailleurs de superbes 
codes-barrse;elle s'anproche beaucoup de la table 
traçante par ses possibilités. Le module Time est 
également très spectaculaire pour celui qui ne l'a 
jamais vu fonctionné. De plus, il a de très nombreu- 
ses applications; il permet, grace à un petit prgm, 
de mesurer la vitesse de la machine...etc. 
L'anrès-midi a également été provice au traite- 
ment synthétique.A ce pronos, Jacques nous a passé 
une fonction qu'il a créé,"JVP",fonction extraordi- 
naire qui permet une introduction "alpha" des fonc- 
tions dites "synthétiques. À noter que PPC Paris a 
publier un prgm très bien conçu, très "synthétique", 
permettant de déprivatiser un pregm "très"privé ou 
bien de privatiser un vrgm "très" dur. 
Pendant cette journée, l'ambiance a été extraordi- 
naire;le temps a passé avec une vitesse déconcer- 
tante ;tout le monde a travaillé ensemble,s'est 
expliqué toùt de bon coeur, sans retenue,tout le 
monde a formé une grande famille, parisiens ou non. 
D'ailleurs, pour en revenir à eux, Robert et Francis 
ont mfait preuve d'une grande volonté d'union des 
deux sections françaises de PPC.Et tout 1 PPC-T Noë&g 
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le monde était d'accord. C'est tout de même bête 
d'avoir en France (et cela n'est à ma vmonnaissance 
arrivé qu'en France) deux sections PPC qui éditent 
chacun de leur côté un journal. imaginez tous la 
richesse d'un journal commun; elle sortirait du 
commun, c'est certain puisque déjà les deux journaux 
séparés sont très intéressants.L'idéal serait une 
unique section française ou tout au mobns un seul 
journal fruit du travail de tous.Il fauñrait que 
les deux dirigeants, les deux présidents cherchent 
à aller ensemble dans la même direction et se 
fassent mutuellement des concessions pour aboutir 
à un projet stable... 


En fin de journée ,Jacques nous à fait une démons tra- 
tion d'intervention sur 4l,celle de Bruno en l'oc- 
curence.ll a d'abord démonté la "carrosserie'"pour 

ne s'intéresser qu'à la partie électronique de la 
chose, c'est à dire les circuits imorimés, et les 
composantes. Il nous a montré comment il changeait 
un condensateur pour augmenter la vitesse d'une 
machine.C'est en fait un travail extrèmement 

délicat et minutieux à réaliser qui demande du temps 
et du doigté. 


Voilà, le gros a été dit.J'espère n'avoir tien ou- 
blié de dire d'important. 

Cette journée a été très réussie dans la grande salle 
de chez Jacques,Près du feu de bois. 

Il va sans dire qu'une nouvelle réunion sera propo- 
sée en Bretagne dont la date ne veut pas encore 

être précisée.Espérons déjà qu'elle sera aussi 
réussie que l'a été celle-ci 


à tous, Hanpy Programming 


Crank Lebasiaf À 
ie 







NÉ ess 5 78 se Û 
FRENOM. .....: 
ADRESSE. ....: 
N°PPCPC..... 5 


Je désire acquérir: 


-LA PPCG ROM QUI NO: 

-L£ VSAM OUT NON 

-£ARTE HEX QUI NON 

-PROTOSYSTER QUI NON 

_ CODER- QUI NON 

_- RO! OUI NON 

_ EPROK OUI NCR 

-NFCROM-1B'5s OUI NON 

-PURTEXTENDER OUI NCI: {venant d'emerique) 
Je désire participer à ia traduction du livre de la PFC ROM 
de dE . OUI NON 

ST partager % Va rraivhen dv USAM 
Oovi NON 


à renvoye: à: 


PPC PARIS CHAPTER 


P Guez 
5G,ruc J.J.Rousseau Mes nie 
75091 PARIS 1987 PSE 


Franck Le bas tard 
9672T35P43 Contact Bretagne PPC-T 
10, rue de la Jalousie 
35600 Redon Redon, le 5 sept 1983 


Compte-rendu de la réunion du 3 sent 1983, s'étant 
déroulée en Bretagne, à Romagné chez Jacques Vaucel- 
le, 

Sur les lieux de notre grande première (?) du 2 
avril 1983 -Remercions à ce vronos Jacques de nous 
avoir encore une fois acceuilli sous son toit-, nous 
nous sommes retrouvés une douzaine de "dingues" de la 
41 à nous préoccuper de notre passion favorite. 

Etaient présents à cette réunion Gilbert Blanchet 
(T297) de Plérin, Patrick Cahierre (T340) de Guer, 
Jean-Claude Dubois (T?) de Caen, Daniel Georgelin 
(157) de Quiberon, Robert Schwartz (T178P20) de 
Bondy, Grégoire Jouve (T?) de Rennes, André Oisel 
(T?2P52) d'Élancourt, Olivier Pougeon (T62P64) de 
Quiberon, Christonhe Travers (1256) d'Acigné, Bruno 
Tredez (T120) de Blain, Jacques Vaucelle (T106P21) 
notre hôte, et moi-même (T35P43) de Redon. 


À dix heures 30, tout le monde était arrivé, y com- 
pris Robert, venu de Paris en voiture. Tout comme la 
derniére fois, le matériel rassemblé était fort im- 
pressionnant, et Sans doute vlus abondant même. Un 
nombre incalculable de modules, de périphériques, 
des boucles hv-il, deux.grandes imprimantes de 
Jacques, etc, etc. J'ai personnellement découvert de 
très intéressants modules, comme de Plotter, l'Exten- 
de 1/0, l'Hp-il develooment, qui sont réellement 
exceptionnels var la maitrise qu'ils procurent de 
certains périvhériques. 

La journée a particulièrement été nropice aux échan- 
ges en tout genre,c'est à dire non seulement d'idées, 
de programmes, mais aussi de matériels. De plus, de 
très nombreuses machines ont vu leurs caractéristiques 
et leurs performances améliorées par les bons soins 
de Jacques qui a passé une bonne partie de sa journée 
à travailler. Il a notamment accéléré une demi-dou- 
zaine de 41, sous les yeux ébahis de l'assistance. 

Il faut dire que son travail est fait avec tellement 
de minutie et de nrécision qu'on sent réellement sa 

machine en sécurité entre ses mains. Ma CV effectue 

maintenant une boucle de mille tours en environ une 

minute. Cela ne vous donne-t-il pasenvie de confier 

la votre à notre spécialiste ? 

Pour finir, notons le "super" de l'ambiance qui 
rêgna lors de cette journée, chaude, faite de com- 
plicité, de camaraderie, une géniale ambiance "club" 
quoi. 

Je redonne donc à tous rendez-vous pour la prochaine. 


À bientôt 
et 
Heureuse Programmation 


Crank Lhastard 


aie 
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Philippe Romascano O 

Grand-Vennes 39 © 

I0IO Lausanne CH (\ = 
O 


Lausanne, le 29 août 1983 


Cher Jean-Daniel, 


Je vous envoie par ce même courrier le numéro 

de juin du journal PEC-L. Comme vous pourrez 

le constater, nous l'éditons sur HP-75 et 
HP82905B. Mais ce n'est pas encore notre formule 
définitive, car je suis obligé d'entrer tous 

les textes moi-même, chose que je n'aurai plus 


le temps de faire dès la fin de l'année. 


Nous tiendrons notre Assemblée Générale au 
début du mois de décembre. Beaucoup d'éléments 
importants pour le Club vont se décider d'ici 
la fin de l'année, en particulier par rapport 

à Hewlett-Packard Genève, qui semble être très 
intéressé par nos activités. Je vous en repar- 


lerai quand tout sera définitif. 


Dans un dernier numéro de votre journal, vous 
demandez à vos membres ce qu'ils pensent de sa 
présentation. Je vous réponds ici en tant que 
membre de PEC-T, et non en tant que président 

du PPC-L. Je trouve que l'impression des textes 
en réduction est dans le cas de votre journal 
particulièrement difficile et pénible à lire. 

Et de plus, beaucoup de programmes qui pourraient 


être intéressants sont inutilisables, le listing 
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étant ou trop noir, ou trop clair. Je pense que 
les lecteurs de quelque journal que se soit sont 
en droit d'attendre une mise en page clair, et 
surtout lisible! 

Je suis persuadé que vous gagneriez à faire une 
plus grande sélection des programmes publiés, 


L 


quant à leur qualité d'impression à la photocopie, 


Je profite de cette lettre pour avertir vos mem- 
bres qui m'ont commandé une PPC ROM qu'il me 
reste à trouver deux personnes pour pouvoir 
envoyer la commande aux U.S.A., ce qui ne saurait 


tarder. 


Notre Club se porte bien, avec à ce jour plus 
de 50 membres. Nous tenons des réunions qui ont 
beaucoup de succès. Nous n'avons pas décidé de 
la fréquence de parution de notre journal, mais 
je pense que 5 numéros par année sera une bonne 
moyenne. 


Nous avons vu que votre livre était diffusé en 
Suisse. Serait-il possible, en cas de réédition, 
que vous rajoutiez le PPC-L dans la liste des 
chapitres européens ? Peut-être que des lecteurs 


suisses seraient intéressés de nous contacter. 


Nous avons organisé avec Hewlett-Packard Genève 
une visite de leur ‘'Show-Room' pour le lundi 

21 novembre. Ce sera le début de nos activités 
"extérieures"! Et en France, qu'en est-il de 
vos relations avec HP ? Connaissent-ils votre 


existence ? 


Voilà, je reprendrai contact avec vous vers la 
fin de l'année, mais d'ici là, peut-être que 


our une fois vous m'aurez écrit! 
P Vous 
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Je vous envoie mes meilleures salutations, 


Philippe Romascano 


J'ai déja parlé de ce problème de présentation. Il faut tou- 
jours du temps à un imprimeur pour apprendre son métier et connaitre 
les besoins d'un client particulier. Et quand tout va bien il faut 
encore changer! Comme je l'ai dit dans l'éditorial j'ai actuellement 
de la matière pour des numéros doubles. Si je supprime la réduction, 
c'est de numéro quadruple qu'il faudra parler. Je préfère espérer que 
les problèmes d'impression vont se régler. Notre imprimeur actuel, 
si nous avons les moyens financiers de le garder - et une collaboration 
entre nous renforcerait cette possibilité - peut tirer tous nombre 
d'exemplaires et tous types de reliure que nous pouvons espérer. mais 
il faut un minimum d'exemplaires et donc une diffusion maximale. 

Un des avantages du nouveau format est la suppression de 
la limitation en largeur, ce qui simplifiera nos relations. 

Je crois que l'interet du contenu de nos journaux mérite 
que l'on prenne quelque effort pour les lire. Si on se réfère aux journaux 
usuels, ils ont un tirage (au moins 50000) qui leur permet des tarifs 
de publicité ëlevés (environ 5000F la à page!) et une rédaction perma- 
nente. Leur interet est pourtant médiocre. Le problème sera de plus 
en plus net avec la multiplication des rubriques (déja microcode, HP15, 
HP75, bientot HP7..., titanesque effort!). Si la bibliothèque HP de 
Genève avec ses trois employés à plein temps n'a pas tenu le coup, 
c'est la preuve de la dureté de la vie. 

Tous tant que vous êtes, Oh adhérents adorés (!) n'oubliez 
pas que vous êtes 400 et que je suis tout seul! ne me demandez pas 
de répondre à des lettres nécessitant plus de trois lignes, écrivez 
directement aux auteurs des articles, aux autres membres du bureau. 
Par contre je reçois avec plaisir toutes les lettres, même critiques, 
ne nécessitant pas de repgnse...merci. 


\. D Dos IY T1 


APPLICATIONS HP 41 


Pour en revenir à des choses plus intéressantes 
pour le plus grand nombre d'entre nous, cet article de Richard 
Nelson paru dans PPCCJVION3p27 est effectivement très intéres- 
sant: 





"Si vous avez votre HP41 depuis au moins un an, 
ou que vous l'avez utilisé durant l'hiver, il vous est proba- 
blement arrivé ce que j'appellerais un CRASH STATIQUE. Les 
effets d'un crash statique sont souvent un bloquage du clavier, 
ou des affichags étranges . Ceci est produit par l'électricité 
statique. Vous avez senti l'électricité statique quand, après 
avoir marché sur une moquette, vous avez fait une étincelle 
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en touchant un objet métallique (NDT: ou une autre personne!). 
Une ambiance hyper statique est fonction à la fois de la 
température et de l'humidité. Habituellement, vous serez dans 

un environnement hautement statique quand la température descend 
au-dessous de 45 degrés Fahrenheit (NDT: environ 7° Celsius) et 


que l'humidité relative est de 25% ou moins. 


Les crash statiques ne sont pas nouveaux sur les 
ordinateurs. J'ai fait ma première expérience de crash statique 
avec un IBM 1401 lisant des données à partir d'une unité de 
bande magnétique. Après avoir marché à travers la pièce, j'ai 
atteint l'unité de bande magnétique et ai déchargé l'électricité 
statique de mon corps sur l'armoire métallique de l'unité. Au 
ZAP de la décharge, l'unité echappa au contrôle et nécessita 
un"reset"“ C'était en 1962. Je n'ai pas encore vu d'ordinateur 
immunisé contre les crash statiques. La salle des réunions de 
marathon-programmation au Club a une moquette qui est un très 
bon générateur d'électricité statique. J'ai vu des jours si 
propices à la production d'électricité statiquél"tous les ordina- 
teurs présents dans la pièce subirent un crash. Un soir, un HP- 
87, HP-75, HP-41C, PC-1500, et PC-1211 se sont tous crashés. 
J'ai eu des jours où le HP 87 se crachait si fréquemment qu'il 
était impossible de garder CP/M en fonctionnement pour charger 
des données dans la base de données PPC. Quelleest la solution? 
Le jour vraiment mauvais dont j'ai parlé, j'ai simplement tout 
coupé et j'ai continué le lendemain. Dans le cas général, on 
doit attaquer le problème statique, par la bonne conaissance 
de la façon dont les charges sont produites et injectées dans 
l'électronique des ordinateurs. 

Décrivons d'abord ce qu'est une charge statique, 
comment elle est produite et comment elle se déplace,.Comme 
concept physique, les charges statiques peuvent être comparées 
à de minuscules insectes. Comme des insectes, les charges stati- 
ques se promènent sur la surface d'un objet. On peut penser con- 
ceptuellement à ces insectes statiques, comme étant de deux 
types. Au lieu d'être mâle et femelle, ils sont appelés positif 
et négatif. Les charges statiques, comme mâles et femelles, 
s'attirent mutuellement. En termes physiques, les règles de base 
des charges statiques sont: des charges différentes s'attirent, 
et des charges semblables se repoussent. Les charges elles-mêmes 
sont trop petites pour être vues, mais elle peuvent être obser- 
vées par leurs effets. Le mouvement des charges statiques est 
limité en premier lieu par les isolants qui les empêchent de se 
déplacer librement. Si des charges statiques atteignent un con- 
ducteur, elle deviennent des charges dynamiques en mouvement, 
souvent décrites sous le nom d'électricité. Les charges statiques 
restent 'Statiques' tant qu'elles n'entrent pas en contact avec 
un conducteur. C'est pourquoi l'humidité joue un rôle si impor- 
tant pour créer l'environnement favorable. On produit des char- 
ges statiques chaque fois que l'on déplace ou sépare la plupart 
des matériaux. Si ces charges ne peuvent pas se déplacer de fa- 
çon à se neutraliser mutuellement, elles forment des groupes" 
ou des ''masses'' à la surface de l'isolant. Si l'air est sec, la 
surface peut être un trop mauvais conducteur pour autoriser leur 
dévlacement. Si, cependant, l'humidité est assez élevée, une 
buée peut adhérer à la surface et pourvoir un chemin conducteur 
pour que les charges se neutralisent et se déchargent. La tempé- 
rature joue un rôle dans la mesure où les charges se déplacent 
plus vite à haute température et plus lentement à basse tempéra- 
ture. 


Pour les personnes à l'esprit technique,il existe 
de nombreuses expériences qui peuvent être faites pour démontrer 
les propriétés des charges statiques. j'essaie de rester simple 
dans cette discussion, mais je dois mentionner quelques-uns des 
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points les plus importants. Parlons d'abord des conducteurs et 
des isolants . Nous avons tous entendu dire que le cuivre est 

un bon conducteur d'électricité, et qu'il est utilisé dans la 
plupart des câblages électriques. Nous devons tous sûrement 
savoir que le papier, le verre, et la plupart des plastiques 
sont de bons isolants. Ces affirmations sont en général vraies, 
mais la principale chose que nous devons retenir est que nous 
parlons en termes relatifs. Un bon conducteur autorise une gran- 
de quantité d'électricité à s'écouler. Quant nous traitons de 
charges statiques, cependant, nous nous occupons d'une très 
petite quantité d'''électricité". Cela ne demande pas grand-chose 
à un conducteur de transporter une petite quantité d'électri- 
cité. Pour le vérifier il suffit de charger un objet et de le 


décharger en utilisant divers matériaux pour déterminer ceux 
qui sont bons conducteurs ou bons isolants. Pour les charges 
statiques, de nombreuses sorties de verre, le papier, le bois 
sont bons conducteurs! Ceci est aisément démontré et l'une des 
plus grosses farces des livres de science est de montrer ces 
images de bouteilles de Leyde ou d'électroscope faits de bou- 
teilles de verre avec des joints de caoutchouc. LA PLUPART 
DES DESSINS D'ELECTROSCOPE MONTRES DANS LES LIVRES DE SCIENCE 
NE MARCHENT PAS. Un électroscope est un dispositif fait d'un 
matériau conducteur ayant deux parties suspendues l'une 
contre l'autre, suspendu par un isolant. Si l'électroscope 
est chargé, les deux objets, souvent appelés feuilles à cause 
des anciens électroscopes à feuilles d'or, se repoussent 
mutuellement et leur déplacement physique indique la présence 
de charge. Les deux feuilles s'écartent et sont maintenues 
hautes" tant qu'un contact avec un objet plus grand ou la 
terre" n'a pas lieu. L'électroscope chargé peut servir à tester 
les conducteurs et les isolants. Votre doigt, un morceau de 
papier, de bois, de verre, etc... déchargera l'électroscope. 
Chauffez le papier ou le verre, et le matériau sec deviendra 
un isolant. Le rôle de l'humidité et de la vapeur d'eau con- 
ductrice est clairement démontré de cette façon. Une des plus 
intéressantes et utiles méthodes pour ‘'voir'les groupements de 
charges est d'utiliser une petite lampe au néon dans une 
pièce obscure. La NE-2 avec ses conducteurs à fil est idéale 
(environ 10 cents). Prenez une feuille de plastique et frottez- 
la avec un journal pour la charger. Touchez un des fils de la 
lampe avec vos doigts et faite courir l'autre À la surface 
du plastique. Vous verrez la lampe rougeoyer et produire 
des éclairs quand le fil touche des groupements de charges. 
L'écoulement de courant résultant est unidirectionnel et la lampe 
s'allumera à une électrode ou l'autre de sorte que vous pour- 
rez dire de quel sexe!" sont les "insectes" statiques. 

Tout ce qui précède peut être résumé par l'énoncé 
suivant: 

1- Les charges statiques sont produites quand deux maté- 
riaux sont frottés ou séparés. 

2- Les charges statiques restent à la surface d'un iso- 
lant, sinon elles s'écoulent et se neutralisent. 

3- Les charges semblables se repoussent, les charges 
différentes s'attirent. 

4- La température et l'humidité sont les principaux 
facteurs qui affectent la mobilité des charges produites. Des 
conditions normales d'environnement déchargent les charges sta- 
tiques à mesure qu'elles sont produites et nous ne les voyons 
pas au travail. 
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Nous devons considérer un autre point dans la dis- 
cussion sur la façon dont les charges se comportent et provo- 
quent leurs dégâts. Lorsqu'un grand nombre de charges est 
forcé (souvenez-vous qu'elles se repoussent mutuellement), sur 
une petite surface, elles se combinent pour produire une force 
très importante. Cette force est observée dans l'étincelle qui 
éclate entre vous et le bouton de porte. Si l'étincelle mesure 
un pouce (NDT: 2,5 cm) la tension est environ de 20000 Volts. 
C'est mortel! Cependant, vous n'ètes pas tué par la fine étin- 
celle bleue. La raison en est que la quantité de charge faite 
pour 'hbasser'"' par l'étincelle est très faible. Ceci est décrit 
comme le passage de courant. Vous pouvez aussi voir ces hautes 
tensions à l' œuvre en vous installant dans une pièce obscure 
avec un rouleau de bande de frottement (NDT: ou simplement du 

ruban adhésif). Tirez rapidement une certaine quantité de 

bande hors du rouleau et observez la face adhésive. Lorsque vous 
tirez la bande, elle c'illuminera avec es dé=harges. La lenpe 
au néon décrite ci-dessus nécessite 65 à 80 Volts pour s'allumer 
et ces tensions ne sont pas difficiles à produire. Chaque fois 
que les charges statiques sont impliquées, les tensions sont 

de l'ordre du millier de Volts. Quand il s'agit d'appareils 
électroniques travaillant dans la gamme de quelques Volts, ils 
sont souvent détériorés quand ils sont touchés par une secousse 
d'un millier de Volts, même à faible intensité. 

Il y a quelques autres propriétés que nous devons 
comprendre avant de pouvoir appliquer ces informations pour 
protéger nos ordinateurs. L'une d'entre elles est le concept 
de la cage de Faraday.Une des propriétés des 'insectes' statiques 
est qu'ils ne pénètreront pas une surface conductrice mais res- 
teront à la surface externe. La surface conductrice est appelée 
cage de Faraday. si on place une cage de Faraday autour d'un 
appareil, il est protègé de l'électricité statique. Une autre 
propriété des charges statiques est leur effet quand elles 
se déchargent. L'éclair devient en réalité un émetteur miniatu- 
re qui induit des petits signaux de variation rapide de tension. 
C'est par ce mécanisme que les décharges statiques peuvent 
être ressenties sans aucun passage direct de la décharge. 

Maintenant que nous avons une certaine idée de ce 
que sont les charges statiques (je ne les ai pas réellement 
définies), comment elles sont produites, comment elles se 
comportent, parlons de la façon dont elles font leurs dégâts. 

Il y a deux façons dont les charges statiques peuvent causer 
des problènes sur votre HP-4i, HP-75, etc... L'une est la 
décharge réelle ou l'étincelle dans la machine. Ceci peut 
endommager les très petits circuits internes des circuits 
intégrés. Si l'étincelle creuse des petits trous dans le 
circuit le crash est habituellement décrit comme un crash 
dur. Ce type de crash aboutit généralement en une coûteuse 
note de réparation de l'usine. Les décharges statiques qui 
induisent des changements de signal dans la machine mais 

qui ne causent pas de dégâts physiques, peuvent être décrit 
comme causant des crash doux. Les HP-41 les plus récentes 
sont conçues avec des diodes rapides qui assurent un 

passage à bas voltage de barrage pour neutraliser les charges 
statiques. Ces machines éprouveront plus de œash doux que de 
crash durs. En plus de la conduction réelle et du mouvement des 
charges statiques il y a la possibilité pour les décharges 
statiques de transmettre des impulsions par couplage capaci- 
tif dans les circuits logiques et causer des plantages. 

Trois types de conditions peuvent exister quant à 
l'élecricité statique. Je les appellerai normale, statique, et 
hyperstatique. Dans des conditions normales, l'électricité 
statique qui est produite en permanenceest neutralisée aussi 
vite qu'elle est proäuite et nous ne la remarquons pas. 
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(publicité) 
PRODUCTIONS JACQUES VAUCELLE 

Amélioration de HP41C: 
Configuration maximale:peuvent se trouver dans un seul boitier de HP41C: 
vitesse multipliée par 1,7, 1525 registres, batterie spéciale (autonomie 
+ 140%), HP-IL incorporé, module Time incorporé, etc..les 4 ports 
restent libres (avec cependant quelques limitations). Bien sûr les 
modifications sont effectuée selon demande du client, travail persona- 
lisé, il est indispensable de nous contacter avec un projet précis que 
nous mettrons au point ensembles. 

Assemblage de modules 
Plusieurs modules dans la même boite, une solution simple et économique 
au problème de l'encombrement. 

Imprimantes HP-IL 

Imprimantes avec interfaces multiples (RS232, Centronics + HPIL, 
utilisables simultanément) 80 colonnes, 132 colonnes et maintenant 
imprimante graphique (vue sur le stand HP au SICOB) printer JVPG 250 
dimensions 10x34x43 déplacement de la tête de gauche à droite et du 
papier (largeur 250 maxi) de haut en bas. Papier en rouleau où acordéon 
habituel, impression à aiguilles, matrice 11 x 9. En mode texte, 6 
largeurs de caractères, 3 hauteurs de caractères et 3 intensités 
programmables, de 40 à 136 caractères par ligne, 160 caractères seconde, 
alignement des colonnes de tableaux, en mode graphique, 576 points 
disponibles à 10 lignes par seconde. 

Nous pouvons également 
Vous fournir des modules HP (dont le HP-IL Developement) et des 
accessoires comme l'interface RS232/HP-IL a des prix trés avantageux; 

Jacques Vaucelle "La chasserie" 35133 Romagné tel 16 (99) 98 83 69 


Dans des conditions statiques, nous avons du mal à utiliser 
nos machines, et ellespeuvent se crasher fréquemment. Dans des 
conditions hyper statiques, le climat est si se-c, avec une 
température plutôt basse, que l'on ne peut pas bouger sans 
subir de décharge tellement l'électricité statique 
est facilement produite. Je ne vous conseille pas d'utiliser 
votre ordinateur en conditions hyperstatiques. Vous avez de 
grandes chances d'avoir un coûteux crash dur. C'est pour les 
conditions statiques que j'essaye de définir une ligne de 
conduite permettant d'utiliser votre machine. 

La protection idéale pour un ordinateur est de 
l'enfermer dans un emballage entièrement conducteur. Les 
ingénieurs, cependant, ne le permettent pas pour des raison 
d'esthétique et de coûts, on fait donc des compromis. Si vous 
devez utiliser votre HP-41 dans des conditions hyper statiques 
vous pourriez la placer dans un sac de matière plastique 
conductrice. Vous pouvez appuyer sur les touches, et la 
machine est entourée d'une cage de Faraday (NDT: tel que le 
sac dans lequel est livré le module HP-IL, du moins les récents) 
Prenons la HP-41 conme exempis spécifique de pian’age éleciro- 
statique en utilisation normale. 
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